Chinaunix

标题: 请问如何获得脚本所在路径？ [打印本页]

作者: soichiro 时间: 2007-01-24 18:21
标题: 请问如何获得脚本所在路径？
$ENV{PWD}是运行脚本的当前路径，而我需要的是脚本所在的路径，我看了%ENV里都没有，请问如果获取？谢谢。

作者: lonelyair 时间: 2007-01-24 19:32

原帖由 soichiro 于 2007-1-24 18:21 发表
$ENV{PWD}是运行脚本的当前路径，而我需要的是脚本所在的路径，我看了%ENV里都没有，请问如果获取？谢谢。

perldoc perlvar
$$

作者: soichiro 时间: 2007-01-24 20:14

原帖由 lonelyair 于 2007-1-24 19:32 发表

perldoc perlvar
$$

$$是PID。
$0在Activestate Perl for Windows中是返回脚本的绝对路径，而Linux下的Perl返回的只是脚本的文件名，还是无法取得脚本所在目录。

作者: 路小佳 时间: 2007-01-24 20:27
getcwd

作者: soichiro 时间: 2007-01-24 20:33

原帖由 路小佳 于 2007-1-24 20:27 发表
getcwd

getcwd返回的还是当前目录，并不是脚本所在的目录。

作者: soichiro 时间: 2007-01-24 20:39
搞定了:

use FindBin qw($Bin);
print $Bin;

谢谢各位。

作者: 兰花仙子 时间: 2007-01-24 22:41

原帖由 soichiro 于 2007-1-24 20:39 发表
搞定了:

use FindBin qw($Bin);
print $Bin;

谢谢各位。

sorry,刚才回复错了。

作者: rongy 时间: 2007-01-25 10:22
用dirname $0是不是更简单些？

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)