2011-08-12 1 views
1

Приложение My Perl получает относительные пути к файлам и аргументам, а затем преобразует их в абсолютные пути. Я использовал Cwd::abs_path($fileName) просто отлично, но теперь мне нужно поддерживать символические ссылки, и я нахожу, что abs_path даст мне абсолютный путь к исходному файлу.Perl альтернатива Cwd :: abs_path для символических ссылок

Что мне нужно, это альтернатива Cwd::abs_path, что при предоставлении относительного пути к символической ссылке он преобразует его в абсолютный путь к той же символической ссылке. Любые рекомендации?

Пример:

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

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

Я подозреваю, что File :: Spec-> rel2abs - это то, что я искал все время :) Я проверил документы, но ничего не видел для любой функции, указывающей, как они обрабатывают символические ссылки. Я что-то пропустил? –

ответ

4

File::Spec->rel2abs не делает никаких проверок системы, поэтому он не будет разрешать символические ссылки.

+0

Спасибо за объяснение –