>...
>cont = 0;
>while (<FILE_IN>) {
>cont++
>$file_out = $_;
>$file_in = $cont;
>system "mv $file_in $file_out";}
>...Hello, I think it's better to use perl's "rename" instead of system call "mv". See 'perldoc -f rename'. -- Books below translated by me to Chinese. Practical mod_perl: http://home.earthlink.net/~pangj/mod_perl/ Squid the Definitive Guide: http://home.earthlink.net/~pangj/squid/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
