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

"Codificação" de texto em Perl

Verificar se usuário é root

Renomeando arquivos de forma padronizada

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

Lista de números aleatórios não-repetidos de um intervalo em Perl

Nenhum comentário foi encontrado.