在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
File::Spec 模块提供了很多的功能,这里只列举几个常用的函数 rel2abs : 返回一个文件的绝对路径, 常见用法,返回当前运行的perl脚本的绝对路径 代码示例: my $prog = File::Spec->rel2abs( __FILE__ ); 其中 __FILE__ 是一个内置变量,代表当前脚本; splitpath : 将文件的路径进行分割,返回值为一个长度为3的列表,第一个元素为该文件,第二个元素为该文件所处的目录,第三个元素为该文件的名字 代码示例: my $prog = $prog = File::Spec->rel2abs( __FILE__ ); my (undef, $dir, undef) = File::Spec->splitpath($prog); 这里有一个不常见的写法,当解列表的时候,可以用undef 接受那些你并不关心的变量; catpath: 用/ 分隔符将文件连接起来 代码示例: my $align_prog_s = File::Spec->catpath($vol,$script_path,$align_bin_s);
|
请发表评论