in reply to Perl/Tk question: printing from a window
This question gets asked every so often, see Printing in Tk or super search for other examples.
Martin