在perl中提供了大量的模块以及别人写好的模块,可以安装使用。
1> 例如可以用use File::Basename,引入模块,并且可以直接使用这个模块里面的全部函数。
use File::Basename;
my $dir = "/var/www/html";
my $bname = basename $dir;
print $bname."\n";
output:html
2> 有时在引入模块后,发现子程序中有和模块的函数相同名字的函数,此时子程序中已经将自己的子程序例如&dirname作为了perl的子程序,这时,如果不用模块中的同名的子程序,可以在引入模块的时候,指定需要的函数;
use File::Basename qw/basename/;
还有一种写法是:
use File::Basename qw//; 或者use File::Basename ();
加载模块,但不引入任何函数名,如果引入函数名,可以像前面一样使用短的名字,如果没引入的话,也能通过下面方式使用函数,而且不会跟自己定义的相同的函数名冲突。
use File::Basename ();
my $dir = "/var/www/html";
my $bname = File::Basename::basename $dir;
print $bname."\n";