当前位置: 传客网 > Perl实用模块学习 ----FindBin & Cwd

Perl实用模块学习 ----FindBin & Cwd

2016-12-30 作者:迷糊zx

原文链接:http://blog.csdn.net/virbird/article/details/20138695

1. 如何使用:

FindBin

 

[plain] view plaincopyprint?
  1. use FindBin qw($Bin);  
  2. my $root_path $Bin;  
  3. print "脚本的路径:$root_path\n";  

 

Cwd

[plain] view plaincopyprint?
  1. use Cwd qw(abs_path getcwd);  
  2. my $abs abs_path(getcwd());  
  3. print "运行脚本的路径:$abs\n";  

 

2. 它们的区别

大家一定注意到了"


我们在E:\te\test\path.pl, 这里就可以清晰看出:

FindBin qw($Bin)获取的是脚本所在目录的绝对路径

Cwd qw(abs_path getcwd)获取的是运行脚本时所在的目录的绝对路径




相关推荐

返回
顶部