请教怎么进行全屏截图？perl,python代码都行

请问如何进行全屏截图？perl,python代码都行
我是想全屏截图保存成文件。我用的是Tcl，但好像没什么人用。
所以求个Perl或Python截图保存成文件的代码作参考。谢谢！

[解决办法]
这种问题随便google下就行了：http://www.varesano.net/blog/fabio/capturing%20screen%20image%20python%20and%20pil%20windows
[解决办法]
找imagegrab库下一个装好
我以前写的python仿qq截屏关键代码:

Python code

from ImageGrab import grabimg = grab((0,0,width,height))    if img != None:        img.save('tmp.png')