了解 Perl/Tk 模块--Perl/Tk 基础知识

　　执行此脚本将生成 GUI 应用程序，如下面的图 1 所示。

　　图 1. Hello World 示例

　　让我们逐行分解一下此脚本：

　　　#!/usr/bin/perl -w

　　第一部分 (/usr/bin/perl) 定义了 Perl 可执行文件在计算机上驻留的位置，指示计算机使用该 Perl 可执行文件的副本执行 helloworld.pl 文件。此命令行的第二部分 (-w) 是 Perl 中的一个重要工具：它支持在执行脚本时发出警告，通知最终用户可能发现的任何错误。

　　在执行期间不应评估的注释和文本前面都加上了一个#号：

# Display Hello World program

　　为了让 Perl 脚本使用 Tk 模块，还必须包含此模块，即use Tk。将use strict语句添加到 Perl 脚本还有助于发现任何可能的输入或逻辑错误：

use Tk;
use strict;

　　要创建应用程序的主窗口，请使用MainWindow，并将它分配给$mw。$mw充当所有其他小部件的父部件：

my $mw = MainWindow->new;

　　将主窗口大小设置为 200 x 100，让该窗口的标题为“Hello World!!!”：

$mw->geometry("200x100");
$mw->title("Hello World!!!");

　　在主窗口内创建一个标签，并使用标题 Hello World。标签创建的末尾是一个附加函数pack，它是一个几何管理器。该管理器用于小部件上，用来计算在小部件的父部件上分配的空间；同时还显示该小部件：