用于符号链接的 Cwd::abs_path 的 Perl 替代方案答案

【问题标题】：Perl alternative to Cwd::abs_path for symbolic links用于符号链接的 Cwd::abs_path 的 Perl 替代方案
【发布时间】：2011-08-12 18:02:25
【问题描述】：

我的 Perl 应用程序接收文件和参数的相对路径，然后将它们转换为绝对路径。我一直使用Cwd::abs_path($fileName) 很好，但现在我需要支持符号链接，我发现 abs_path 会给我原始文件的绝对路径。

我需要的是Cwd::abs_path 的替代方法，当给定符号链接的相对路径时，它会将其转换为相同符号链接的绝对路径。有什么建议吗？

例子：

/originals/myfile1
/links/myfile1link -> /originals/myfile1

> cd /links
> perl converter.pl /myfile1link
> output: /links/myfile1link

【问题讨论】：

【解决方案1】：

File::Spec->rel2abs 不做任何系统检查，所以它不会解析符号链接。

【讨论】：