Question

Write a perl program for copy one file to another

Answer 1

Answer:

• use File::Copy;
• copy("sourcefile","destinationfile") or die "Copy failed: $!";
• copy("Copy.pm",\*STDOUT);
• move("/dev1/sourcefile","/dev2/destinationfile");
• use File::Copy "cp";
• $n = FileHandle->new("/a/file","r");
• cp($n,"x").