[Cascavel-pm] Concatenar arquivos
Patty Silva
ptfzs em yahoo.com.br
Sexta Julho 14 13:09:53 PDT 2006
Pessoal consegui
Fiz assim: e funcionou.. porem nao sei se eh a melhor forma:
<CODE>
--------------------------------------------------------------------------------------------------------------------------------
#!/usr/bin/perl
#
my $caminho= "$ENV{HOME}/perl";
chdir ($caminho) || die "\n *** Erro no diretorio $caminho ***";
while ($arquivo = <*.txt>)
{
$arquivo=~ /(\d\d\d\d\d\d\d\d\d\d)/;
$arquivo=$1;
push(@arquivos,$arquivo);
}
my %hash;
foreach (@arquivos)
{
$hash{$_} = 1;
}
foreach (sort keys %hash)
{
print "$_\n";
`cat $_* >$_.txt`;
}
--------------------------------------------------------------------------------------------------------------------------------
E outra coisa.. queria apagar os arquivos permanecendo somente o que eu concatenei.. :)
Obrigada pessoal
Patty Silva <ptfzs em yahoo.com.br> escreveu: Ola Pessoal..
Eu again! :)
Fiz um script para concatenar arquivo de um diretorio:
<CODIGO>
---------------------------------------------------------------------------------------------
my $caminho= "$ENV{HOME}/teste";
chdir ($caminho) || die "\n *** Erro no diretorio $caminho ***";
while ($arquivo = <*.txt>)
{
$InFile= $caminho.$arquivo;
push(@arquivos,$arquivo);
}
system(`cat @arquivos>>$data_out.tmp`);
unlink(@arquivos);
---------------------------------------------------------------------------------------------
Porem quero concatenar arquivos com a msm data ou seja,
os nomes dos arquivos sao ANOMESDIAHORA_tipo.txt
Quero concatenar arquivos com ANOMESDIAHORA iguais.. e gerar somente um ANOMESDIA.txt
Se alguem puder me dar uma lUz :)
Obrigada
---------------------------------
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora!_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm
---------------------------------
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas!
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20060714/601b4f77/attachment.html
Mais detalhes sobre a lista de discussão Cascavel-pm