For info about printing from a canvas and an amplification of the snippet that liverpole gave you, I'd recommend Data visualization using Perl/Tk. See the section "Saving the work".