rename $oldname, $_ or die "Can't rename $oldname to $_: $!";