And not waste space by bringing all those filenames into an arraywhile(<*.old>){ ($new = $_) =~ s/old$/new/; rename($_,$new); }
$_.=($=+(6<<1));print(chr(my$a=$_));$^H=$_+$_;$_=$^H; print chr($_-39); # Easy but its ok.
In reply to Re: rename files in directory with new extenstion
by damian1301
in thread rename files in directory with new extenstion
by c
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |