相关疑难解决方法(0)

#test-> a.pl

my $file = '/home/joe/test';
if ( -f $file && -l $file )  {
    print readlink( $file ) ;
}

如何获取符号链接文件的绝对路径？