open(PRN, "|lp"); print PRN "hello"; [download]
In reply to Solved: Can I trigger a hardcopy (printer print) from perl? by Anonymous Monk