in reply to Renaming non-ascii files

First of all, your code doesn't even compile. There are two errors:
elsif($myfile =~ m/[\? ]+(\([0-9]+\))?\.(\w+)\i)
needs to be changed to
elsif($myfile =~ m/[\? ]+(\([0-9]+\))?\.(\w+)/i)
$newname = join "." $temp, $ext;
needs to be changed to
$newname = join ".", $temp, $ext;
At that point it will compile. Please post the code you are actually using.

Replies are listed 'Best First'.
A reply falls below the community's threshold of quality. You may see it by logging in.