Este script mostra como trabalhar com listagem de arquivos, verificação de existência de tal arquivo, e outras mais, bem pequeno e resumido e de facil compreenção,

• Download listadir.pl
• Enviar nova versão

Esconder código-fonte

#!/bin/perl
$diretorio = "./";

opendir(diretorio, "$diretorio");
@lista = readdir(diretorio);
closedir(diretorio);

foreach $arquivo(@lista)
{
  if ($arquivo eq "senhas.pwd"){print "senhas:->"}
  if ($arquivo eq "me_pule.jfs") {next}
  print qq~$arquivo~. "\n";
}

Script que procura uma palavra em um arquivo.

Manipulação de arquivos

Inserindo sites em Lista do Squid

arruma_nomes.pl

Rsync e Perl: Sincronização de arquivos com gestão de backup incremental integrada

Nenhum comentário foi encontrado.