I have written the following little test program for the printer module.
When I replace MSWIN32 with LPT1. It prints to the printer on that post. My
main printer on on the usb bus. I've tryed DOT4 which is what shows up in
the my computer device mgr. and to DOT4_001 which shows up in control panel
printer. Neither work. Does anyone know if Printer will work with USB.
#!c:\perl\bin\perl
print "Content-type:text/html\n\n";
use Win32;
use printer;
$printer = new Printer('osname' => 'printer port');
$prn = new Printer('MSWin32'=>'DOT4_001');
%available_printers = $prn->list_printers;
$data = members.txt;
$prn->use_default;
$prn->print($data);
exit;
Russ Fineman
This email scanned by AVG Free
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
