如何使用Perl获取文件的目录名?

前端之家收集整理的这篇文章主要介绍了如何使用Perl获取文件的目录名?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
在我的perl脚本中,我有param $FILE = / etc / sysconfig / network

以这种方式(在perl中)我可以只剪切目录并将目录放在$DIR param中

为了得到:

$DIR=/etc/sysconfig

(like dirname /etc/sysconfig/network in shell script)

解决方法

use File::Basename;

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

$name = fileparse($fullname,@suffixlist);
$basename = basename($fullname,@suffixlist);
$dirname  = dirname($fullname);

阅读更多关于File::Basename在perldoc.

猜你在找的Perl相关文章