perl如何使用包





 

首先创建一个test.pm的包,里面写一个方法,如下

 

package util::test;

require Exporter;

@ISA=qw(Exporter);

our @EXPORT    =qw(test1);

use strict;

use warnings; 

sub test1{

print "111";

}

 

然后新建一个test.pl文件,内容如下:

#!/usr/bin/perl -w

 

use util::test;

test1();

 

运行perl test.pl就会在屏幕上输出111.

 

 

分享:  DeliciousGReader鲜果豆瓣CSDN网摘
Trackback

no comment untill now

Add your comment now

无觅相关文章插件