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

Scalar - Alguns dos usos mais comuns deste tipo de variável do Perl

Simples Contador

Cadastro usando arquivos .txt para guardar dados

Conversor de moedas

data do servidor em perl

Nenhum coment�rio foi encontrado.