use File::Copy; #### @EXPORT = qw(copy move); @EXPORT_OK = qw(cp mv);