Question

用ActivePerl V5.8.8.822 怎么将*.pl生成.exe

Answer 1

打开 ppm，安装一下模块:
Parse-Binary, Win32-Exe, Module-ScanDeps, PAR-Dist, PAR

好了，搭庆拿都搞定了。

下来我们来看看如何使用。

使用你喜欢的编辑器，进行编辑：
#! /usr/bin/perl -w use strict; print "Hello,world!\n"; #:~

保存为 hello.pl。

接下来我们进行编译，差悔在控制台下输入：
pp -o hello.exe hello.pl

好了，检查一下生成的 hello.exe 吧，除了生成的有些大，没什么问题(我的大概 1.3M)。
建议不要使用压缩软件，比如 UPX 等，否则会有一些附加错误信息。

我们也可以生成 gui 程知搭序，代码如下：

#! /usr/bin/perl -w use strict; use Tk; my $wm = MainWindow->new; my $label = $wm->Label(-text => "Hello,world!"); $label->pack; $label->bind('' => sub {$wm->destroy}); MainLoop; #:~

好，保存为 hellogui.pl，我们通过命令：
pp --gui -o hellogui.exe hellogui.pl
得到 hellogui.exe，大概 2.3M 左右，如果高兴，可以用 UPX 压缩，压缩后在 1.9M 左右。

你也可以设定自己的 icon，具体的方法和其他说明信息可以使用 perldoc pp 命令查询。

另外，还有一个 gui 版本的 shell，你可以通过运行 tkpp 执行。