这篇文章主要介绍了perl如何处理文件路径,具有一定借鉴价值,感兴趣的朋友可以参考下,希望大家阅读完这篇文章之后大有收获,下面让小编带着大家一起了解一下。

以前处理文件路径的时候都是自己写正则表达式,而用perl的模块来解决则更加迅速、准确。

用到的模块File::Basename

这里有三种方法:fileparse、basename、dirname。

其用法如下:

($name,$path,$suffix) = fileparse($fullname,@suffixlist);

$basename = basename($fullname,@suffixlist);

$dirname = dirname($fullname);

说明:


1. 方法basename只取文件名,例如

/wangq/project/4910_Epididymal.fq.gz

则输出$filename==>4910_Epididymal.fq.gz;


2. 方法dirname只取路径部分,例如

/wangq/project/4910_Epididymal.fq.gz

则输出$path==>/share/nas1/wangq/project;


3. 方法fileparse是将一个文件的全路径拆成三部分,文件名、目录名和后缀,@suffixlist是给一个后缀的集合。例如

/wangq/project/4910_Epididymal.fq.gzfq.gz");

则输出 $base ==>4910_Epididymal; $path ==>/share/nas1/wangq/project/; $type ==> .fq.gz

感谢你能够认真阅读完这篇文章,希望小编分享的“perl如何处理文件路径”这篇文章对大家有帮助,同时也希望大家多多支持亿速云,关注亿速云行业资讯频道,更多相关知识等着你来学习!