You might want to look at Imager::Screenshot. Have a script open a web browser, then run either the win32 or x11 screenshot function, and then close the window. I'm fairly rusty on my Tk though, so I couldn't tell you how to do it off the top of my head.