Drucken auf dem Server - Schnittstelle gesucht

[WauWau]

Moin,

hmm... es kann sein, dass ich sogar fündig geworden bin:

---------------------------
 use Win32::Printer;

my $dc = new Win32::Printer(
                                papersize       => A4,
                                dialog          => NOSELECTION,
                                description     => 'Hello, Mars!',
                                unit            => 'mm'
                            );

my $font = $dc->Font('Arial Bold', 24);
 $dc->Font($font);
 $dc->Color(0, 0, 255);
 $dc->Write("Hello, Mars!", 10, 10);

$dc->Brush(128, 0, 0);
 $dc->Pen(4, 0, 0, 128);
 $dc->Ellipse(10, 25, 50, 50);

$dc->Close();
---------------------------
http://search.cpan.org/~wasx/Win32-Printer-0.8.0/Printer.pm

Nur komischerweise sehe ich hier keine Möglichkeit, einen Drucker auszuwählen ;-)

Gruß,
WauWau
--
ss:) zu:) ls:& fo:) de:] va:) ch:° n4:( rl:( br:^ js:| ie:% fl:{ mo:|
Self ist der WauWau