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

Calculadora de IMC em Perl

Inserindo o nome de aluno e calculando média de suas notas

check_mem.pl - Plugin Nagios para checar consumo de RAM

Assistente de instalação por apt!

Verificar se usuário é root

Nenhum comentário foi encontrado.