Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

clear print queue in windows

by Anonymous Monk
on Feb 26, 2013 at 22:44 UTC ( #1020776=perlquestion: print w/ replies, xml ) Need Help??
Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Hi All,

I was able to figure out how to find the print jobs that belongs to a print server. Would someone explain me how to clear/purge the print queue once I printed a document?

#!/usr/bin/perl use Win32::Printer::Enum; use Win32::Printer::Enum qw ( Jobs ); my $printer = 'Xerox-Phaser-8560'; my @printers = Printers(); # to get printernames foreach my $p (@printers) { if ($p->{PrinterName} eq $printer) { my @jobs = Jobs($p->{PrinterName}, 0, 1); # how I can clear the jobs here or is any other # effective method to clear the print queue for # a print server? } }

Comment on clear print queue in windows
Download Code
Re: clear print queue in windows
by vinoth.ree (Parson) on Feb 27, 2013 at 04:44 UTC

      Did you check that node?

      It doesn't answer the question, and the OP is trying to use Win32::Printer::Enum like that node suggests

        Yes I checked that thread but that didn't answer the question of clearing print queues. I used Win32::Printer::Enum as it suggested in that thread.
        I'm new to use Perl in windows and any help would be greatly appreciated.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1020776]
Approved by ww
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (11)
As of 2014-07-23 16:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (147 votes), past polls