Trotz Deiner eigenen gefundenen Lösung noch meine Anmerkung dazu:
rename() benutzt Dateinamen, keine Dateihandles oder Rückgabewerte von
open().
Ausserdem solltest Du den Erfolg von rename überprüfen:
rename( $oldname, $newname ) or die "rename( $oldname, $newname) failed: $!\n";
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!