Before I start, take a look at this interesting review of GIMP versus Photoshop. As GIMP is free, and Photoshop is $650, if you ever need to edit an image, you should have GIMP. It's available for Windows and MacOS too. Check this out too.
Ok, here's my latest concoction.. Call it transrename.
{die "Usage: transrename pattern files...\n";}
my @argvc = @ARGV; # Some platforms can't shift @ARGV
my $code = shift(@argvc);
print "\n";
foreach (@argvc)
{
my $old = $_;
eval $code;
print " $old => $_\n";
if($old ne $_)
{
system("/bin/mv", '-i', $old, $_);
}
}
In other technology uses, the possibilities in this are astounding.
I'll be putting up some new pictures in my gallery soon.
Finally,
Back to work!