[Cascavel-pm] apagando arquivos

[Thomas Britis]

Duas formas.

1- (feia, q nem a sua, hehe):
#!/usr/bin/perl
`find ../../dircod/ -exec rm -f {} \;`;

2- (bonita):
#!/usr/bin/perl
unlink <../../dircod/*>;

fernandolouis em terra.com.br wrote:
> Cara, eu uso
>  
> #!/usr/bin/perl
> `rm -f ../../dircod/*`;
>  
> pra deletar todos os arquivos do diretório "dircod".
>  
> O problema é que quando o diretóri atinge mais de uns 7.000 arquivos, 
> esse comando não exclui nada!!!
> Daí tenho que remover manualmente.
>  
> Como substituir o comando acima pelo mencionado por você? Não entendi 
> muito bem como utilizar isso no meu scrip cgi.
>  
> []s
> Fernando
>  
> 
>     ----- Original Message -----
>     *From:* Frederico Recsky <mailto:frederico em gmail.com>
>     *To:* Cascavel Perl Mongers <mailto:cascavel-pm em pm.org>
>     *Sent:* Wednesday, May 30, 2007 10:46 AM
>     *Subject:* [Cascavel-pm] apagando arquivos
> 
>     Não é nada de novo, mas é util pacas.
> 
>     perl -e 'unlink <*>'
> 
>     Estou comentando porque eu tava sofrendo com um diretorio com
>     trocentos arquivos.
> 
> 
> ------------------------------------------------------------------------
> 
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm

-- 
Thomas Storino Britis
TCNet Informatica e Telecomunicacoes LTDA