use File::Copy; copy($file,'lpt1:'); [download]
In reply to Re: How do I send a file to the printer on Win32? by munchie in thread How do I send a file to the printer on Win32? by munchie