Perl脚本语言中包(Package)的用法

比如我们有一个以文件名Hello.pm

包的内容如下：

package Hello;

use strict;

sub HelloWorld()

{

      my $data = "hello world";

      print "$data\n";

}

下面我们写一个perl程序test.pl包含这个包，并调用函数HelloWorld()

test.pl的具体内容如下：

#!/usr/bin/perl -w

use strict;

use lib("/home/work/");  #假设Hello.pm包放在此目录下

require Hello;          #把包导入，相当于C语言中的include

Hello::HelloWorld(); #无参数函数调用方法

 

此程序很简单，只想说明白package的用法。

输出结果为：

hello world