求助，Perl脚本 use lib dirname (file)什么意思?有什么特殊含义吗？

Question

use lib dirname (file) . "/lib"又什么意思?

Answer 1

File::Basename模块的作用是：将一个文件的所在路径，文件名称，文件后缀区分开

qw(dirname)的意思是，只使用分开路径的功能

#! /usr/bin/perl

use strict;
use warnings;
use File::Basename qw(dirname);

my $fullname='d:/3/2.txt';

my $dirname = dirname($fullname);
print "dirname=$dirname\n";
#结果 dirname=d:/3