use File::Copy;



copy("src-file", "dst-file");

copy("Copy.pm", \*STDOUT);



use POSIX;

use File::Copy 'cp';



$fh = FileHandle->new("/dev/null", "r");

cp($fh, "dst-file");'

*****

use File::Copy "cp"

