use File::Copy qw( move ); 
move( $file_in_old_location, $new_location );