perl File::Spec 模块
Posted 庐州月光
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了perl File::Spec 模块相关的知识,希望对你有一定的参考价值。
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);
以上是关于perl File::Spec 模块的主要内容,如果未能解决你的问题,请参考以下文章