Muda o wallpaper do X-Windows
Publicado por Fábio Berbert de Paula 13/11/2002
[ Hits: 4.897 ]
Homepage: https://fabio.automatizando.dev
Script usado para alterar a imagem de fundo do Desktop do WindowMaker aleatoriamente. Você define o diretório repositório de imagens e, a cada vez que o programa é executado, uma nova imagem é carregada na sua tela.
#!/usr/bin/perl ################################################### # mudaWallpaper.pl # # Script usado para alterar a figura de fundo de # tela do seu X-Windows aleatoriamente. Bom para # ser executado via crontab. A entrada abaixo # executa o script a cada 1 hora: # # 0 * * * * export DISPLAY=0:0; ./mudaWallpaper.pl # # Nota: este script utiliza o programa wmsetbg para # alterar a figura de fundo e só serve para usuários # do WindowMaker. # # Por Fábio Berbert de Paula # E-mail: fabio@vivaolinux.com.br # Estou em: www.vivaolinux.com.br # ################################################# use strict; my $set = "/usr/bin/wmsetbg"; # configure com o diretório que contém seus wallpapers my $wdir = "/home/fpaula/wallpapers"; # capture todos os arquivo jpg do diretório chdir $wdir; opendir(D,$wdir); my @arqs = grep /jpg/, readdir(D); closedir(D); # selecione um wallpaper usando a função rand() my $num = sprintf "%.1f", rand($#arqs); $num =~ s/^.*\.//; if ( -f "$wdir/$arqs[$num]" ) { system("$set $wdir/" . $arqs[$num]); }
Verificação se utilizador existe ou não
Testando a agilidade do sistema de arquivos
Como gerar qualquer emoji ou símbolo unicode a partir do seu teclado
Instalar e Configurar o Slackware Linux em 2025
Como configurar os repositórios do apt no Debian 12 em 2025
Passkeys: A Evolução da Autenticação Digital
Instalação de distro Linux em computadores, netbooks, etc, em rede com o Clonezilla
Muitas dificuldades ao instalar distro Linux em Notebook Sony Vaio PCG-6131L (VPCEA24FM)
Slackpkg+ (Slackpkg Plus) está de volta!
Como dividir duas janelas igualmente e lado-a-lado na sua tela
Configurando o Conky para iniciar corretamente no sistema
3 configurações básicas que podem melhorar muito a sua edição pelo editor nano
Minha rede tem um espaço invisível que não dá pra digitar o nome da re... (1)
Pedagogia no brasil não passa de alfabetização por m4sturbação mental ... (2)
compilação samba 4.22 rock linux 9.5 (3)
Erro de segmentação «Segmentation fault (core dumped)» ao retornar obj... (7)