Viva o Linux for Torsmo
Publicado por Adão S. Raul Neto 18/10/2005
[ Hits: 4.126 ]
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
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
O programa assinador digital (1)
PIP3 - erro ao instalar módulo do mariadb para o Python (9)
É normal não gostar de KDE? (8)
dpkg: erro: gatilho de arquivo duplicado chamado pelo arquivo de nome (6)









