Solved: Can I trigger a hardcopy (printer print) from perl?

[Anonymous Monk]

Monks,

Question: Can I trigger a printout of a hardcopy, text or so, from perl, without the script-hosting system (in this case Linux) asking for a confirmation, a print-dialog or similar?

Answered it myself:

open(PRN, "|lp");
print PRN "hello";

(Note to myself: research first, ask later...). As I already wrote the post, left here in case anyone else comes up with this.

[isync]

Related reading: Net::Printer, Net::LPR, Net::CUPS etc. on cpan.
Or use from perl what the system exposes, for example system("lpr some.pdf").

[mrdurtal]

Would there not be something like:

open(PRN, "|lp") or
    &dienice("Can't print: $!\n");
print PRN "hello";