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

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

我需要的是Cwd::abs_path的替代方法，当给定一个符号链接的相对路径时，将它转换为相同符号链接的绝对路径。任何建议？

例子：

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

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

我怀疑File :: Spec-> rel2abs是我一直在寻找的东西:)我检查了文档，但没有看到任何指示他们如何处理符号链接的函数。我错过了什么？ –

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

2011-08-12 19:36:22 ikegami

感谢您的解释 –

回答