Muda o wallpaper do X-Windows
Publicado por Fábio Berbert de Paula 13/11/2002
[ Hits: 4.961 ]
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]); }
Wallpapers aleatórios no Fluxbox
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Um modo leve de ouvir/ver áudio/vídeo da internet em máquinas pererecas
Resolver algumas mensagens de erro do SSH
Instalar módulo de segurança do Banco do Brasil Warsaw do tipo .run
Sem espaço na partição home (1)
O que você está ouvindo agora? [2] (190)
Procrastinação e autossabotagem são problemas muito comuns na sociedad... (5)
warsaw parou de funcionar após atualização do sistema (solução) (10)