perl如何处理文件路径
这篇文章主要介绍了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如何处理文件路径”这篇文章对大家有帮助,同时也希望大家多多支持主机评测网,关注主机评测网行业资讯频道,更多相关知识等着你来学习!
上一篇:perl中grep怎么用
声卡驱动正常但是没有声音如何办?声卡驱动正常没声音的解决方法
英伟达显卡驱动如何退回到原来版本?英伟达显卡驱动退回到原来版
重装系统,电脑只有一个C盘如何创建分区
Defender提示错误应用程序MsMpEng.exe无法启动
电脑无法启动或仍在加载如何办?电脑无法启动或仍在加载的解决方
打印机驱动如何卸载删除?卸载打印机驱动干净的教程
电脑没网如何安装网卡驱动?教你没网如何安装网卡驱动的方法
系统32位和62位如何选择:详解它们之间的差异
电脑文件删不掉如何办?四种方法解决
任务管理器快捷键有哪些?任务管理器快捷键大全