move( "$basedir/$olddir", "$basedir/$newname" ) or die $!;