image - 如何使用 Perl 显示图像

Question

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

谢谢。

Answer 1

首先你可以使用 LWP::Simple 至 fetch the image并将其保存到磁盘。

之后，最简单的事情上视窗 是做

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

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

上 OS X 你可以做

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

上 freedesktop.org符合标准的系统 你可以做

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

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