use File::Copy;

$file = "fileIwantToCopy.txt";
copy ($file, '//server/printer');