use File::Spec;
use Cwd qw(abs_path);
print abs_path(File::Spec->rel2abs('..')), "\n";2009/2/13 Michael Zeng <[email protected]>: > dear all: > > why > > use File::Spec ; > print File::Spec->rel2abs ( '..' ) > > only get /ux/prj/prjhzeng/.. ? > > i want the absolute address , like /ux/prj > > thanks > > > -- > Yours Sincerely > Zeng Hong > > > --~--~---------~--~----~------------~-------~--~----~ 您收到此信息是由于您订阅了 Google 论坛“PerlChina Mongers 讨论组”论坛。 要在此论坛发帖,请发电子邮件到 [email protected] 要退订此论坛,请发邮件至 [email protected] 更多选项,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛 -~----------~----~----~----~------~----~------~--~---
