Perl得到源文件的路径,使用shell变量
? 为了保证平台兼容性,多使用Cwd取当前目录 use Cwd 'abs_path'; ? 返回一个文件的真实地址,Symlink的话返回Symlink到的地址. 默认的,$ENV{PWD}总不会更新 要解决这个问题,可以使用use Cwd qw(chdir): #!/usr/bin/perl ? 3、perl中使用shell变量 declare -x path=/user/test ? test.pl #!/home/niewf/test.pl $path=$ENV{"path"}; echo "$path/n"; (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |