今天写Perl程序时需要调用到Tk模块，但是我机器上却没有T T。

Perl小白，不知道肿么装新模块。网上搜了一下资料，和大家分享下。

本人机器Windows的系统，没法提供Unix或者Linux的测试，见谅...

如果您使用的是 UNIX 或 Linux，下载和安装 Perl 模块的一种方法是使用 Comprehensive Perl Archive Network (CPAN)。

在命令提示符中输入以下命令：

perl –MCPAN –e shell
install Bundle::CPAN
reload cpan
install Tk //Tk是模块名称

如果您使用的是 Windows，类似的方法是使用 Perl Package Manager (PPM)。

在DOS命令提示符中输入以下命令：

ppm

使用该命令进入PPM：

install Tk  //Tk是模块名称

你会看到PPM去下载Tk模块然后安装。

测试一下Windows下是否安装成功，输入 perl -e "use Tk",回车，没有任何错误警告信息，安装成功。

提供一段代码弹出一个窗口测试一下

#!/usr/bin/perl -w
# Display Hello World program

use Tk;
use strict;

my $mw = MainWindow->new;
$mw->geometry("200x100");
$mw->title("Hello World!!!");

$mw->Label(-text => 'Hello World')->pack();

$mw->Button(-text => "Close", -command =>sub{exit})->pack();

MainLoop;

保存到一个文件中，然后使用perl运行，得到下面窗口界面