Help for this page

Select Code to Download

Select or download this

use File::Copy qw( move );
move($source,$destination) or die "Can't move '$source' to '$destinati
+on': $!";