如何用perl获取某一文件所在路径？

用perl获取某一文件所在路径，参考代码如下：

use Cwd 'abs_path';
print abs_path($0)."\n";
man Cwd
NAME
Cwd - get pathname of current working directory
SYNOPSIS
use Cwd;
my $dir = getcwd;
use Cwd 'abs_path';
my $abs_path = abs_path($file);

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/ee72v3xj722eyxvxy72.html