Este é um contador muito simples, tem comentarios explicativos somente no arquivo para download!

• Download contador.pl
• Enviar nova versão

Esconder código-fonte

#!/usr/bin/perl                      
open(contador, "contador.txt");
$acessos = <contador>;            
close(contador);                
$acessos++;                   
open(contador, ">contador.txt");  
print contador $acessos;          
close(contador);                  
print "$acessos acessos.";

Separa os dígitos de um número

"Codificação" de texto em Perl

Cálculo de área de uma figura geométrica

Programa que separa os dígitos de um inteiro

Usando comandos shell com Perl

Nenhum comentário foi encontrado.