in reply to How do I send a file to the printer on Win32?

It's very easy, as I recently discovered.
use File::Copy; copy($file,'lpt1:');