在Perl中获取当前目录的完整路径

上一篇 / 下一篇  2008-11-17 22:00:33 / 个人分类：perl

查看( 6358 ) / 评论( 0 ) / 评分( 0 / 0 )
  • 文件版本: V1.0
  • 开发商: 本站原创
  • 文件来源: 本地
  • 界面语言: 简体中文
  • 授权方式: 免费
  • 运行平台: Win9X/Win2000/WinXP
51Testing软件测试网\I,PpC"XLrv

有两种方法：51Testing软件测试网Y,H _w0yg9nY
1. use Cwd;51Testing软件测试网1f2Z&k$x7s@B
my $dir = getcwd;
QIj O$G(e1}-]H0#$dir中即为当前目录的完整路径信息。
*y-o P S6Q mh9Ow02. my $dir = $ENV{'PWD'};
1o;FnL1ABzgC0#ENV是一个散列，用于存放环境变量。$PWD是Linux的环境变量，表示当前所在目录。
1L XDM,}0
['YQU4z*HE'uJ0若当前目录为/usr/lib/, 则上面的$dir = /usr/lib

7t-L*bd%lWI2S @0

收藏 举报

TAG: perl

 

评分：0

我来说两句

Open Toolbar