Esse script apresenta o módulo Shell.pm (CPAN) que permite utilizar comando shell diretamente, sem necessidade da intervenção de "system".

• Download shell.pl
• Enviar nova versão

Esconder código-fonte

#!/usr/bin/perl -w
use strict;
#carregamos o modulo Shell.pm:
use Shell;

#Agora usamos comando shell de forma clara (sem system):

#$password recebe saida do cat:
$passwd = cat("</etc/passwd");
#imprime conteudo de /etc/passwd:
    print $passwd;
#copia /etc/passwd para /tmp/passwd, lembra do "system("/bin/cp comando")" ? : 
cp("/etc/passwd", "/tmp/passwd");  
#EOF

Lendo o conteúdo de uma página da Internet

"Codificação" de texto em Perl

Saiba quanto de energia seu PC gasta aproximadamente por mês

Gerando senhas aleatórias

Data por extenso

Nenhum comentário foi encontrado.