如何使用Perl显示图像

我想编写一个perl脚本来自动登录网站并做一些有趣的事情.问题是我想登录的网站有一个验证码图像.我没有能力反对它,所以我需要读取图像然后将图像显示给用户让用户读取图像上的字符,然后在命令行中键入字符回到程序.我想知道,向用户显示图像的最简单方法是什么？

谢谢.

解决方法

首先,您可以使用 LWP::Simple到 fetch the image并将其保存到磁盘.

之后,Windows上最简单的事情就是做

system("C:\\imagepath\\foo.jpg");

这将在用于显示它的默认应用程序中显示图像.

在OS X上你可以做到

system("open ~/imagepath/foo.jpg");

在freedesktop.org标准兼容系统上,您可以这样做

system("xdg-open ~/imagepath/foo.jpg");

这些涉及在命令行应用程序和OS指定的应用程序之间切换以查看图像.如果您希望它更加无缝,您可以使用Perl GUI library并创建一个包含下载图像的窗口