如何使用Perl显示图像

Question

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

感谢。

Answer 1

首先，您可以将 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");

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

Answer 2

在网页中打开？

将您的应用程序创建为Web应用程序，只需使用LWP下载图像，然后将其显示在您的页面中（CGI或Dancer等）

您可以输入一个简单的文本表单，让您输入代码。