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: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |