Viva o Linux for Torsmo
Publicado por Adão S. Raul Neto 18/10/2005
[ Hits: 3.890 ]
Homepage: https://github.com/adaoraul
Pequeno script que mostra os ultimos artigos do site Viva o Linux no torsmo
#!/usr/bin/perl # Script criado para ser usado com o torsmo # mostra o titulo dos 3 ultimos artigos # postados no site vivaolinux.com.br # # by dark_on_weed use POSIX; use LWP::Simple; my $numArgs = $#ARGV+1; my $key = $ARGV[0]; my $conteudo = get("http://www.vivaolinux.com.br/index.rdf"); sub noticia1 { my @noticia1 = split(/<title>/,$conteudo); @noticia1 = split(/<\/title>/,$noticia1[2]); return $noticia1[0]; } sub noticia2 { my @noticia2 = split(/<title>/,$conteudo); @noticia2 = split(/<\/title>/,$noticia2[3]); return $noticia2[0]; } sub noticia3 { my @noticia3 = split(/<title>/,$conteudo); @noticia3 = split(/<\/title>/,$noticia3[4]); return $noticia3[0]; } if($key eq "1") { $noticia1 = noticia1(); print "$noticia1"; } elsif($key eq "2") { $noticia2 = noticia2(); print "$noticia2"; } elsif($key eq "3") { $noticia3 = noticia3(); print "$noticia3"; }
Algoritmo de Euclides estendido em Perl
Remover lista de pacotes do Portage
Enviar mensagem ao usuário trabalhando com as opções do php.ini
Meu Fork do Plugin de Integração do CVS para o KDevelop
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Compartilhamento de Rede com samba em modo Público/Anônimo de forma simples, rápido e fácil
Cups: Mapear/listar todas as impressoras de outro Servidor CUPS de forma rápida e fácil
Criando uma VPC na AWS via CLI
Tem como instalar o gerenciador AMD Adrenalin no Ubuntu 24.04? (15)
Tenho dois Link's ( IP VÁLIDOS ), estou tentando fazer o failover... (0)
Pendrive não formata de jeito nenhum (4)