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

perl 模块

原文链接: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)获取的是运行脚本时所在的目录的绝对路径



你的评论

就没有什么想说的吗?

最新博客

关于我们 加入传客 媒体报道 帮助中心 传客活动 免责声明 联系我们 移动版 移动应用

©2017传客网    琼ICP备15003173号-2    

本站部分文章来源于互联网,版权归属于原作者。
本站所有转载文章言论不代表本站观点,如是侵犯了原作者的权利请发邮件联系站长(weishubao@126.com),我们收到后立即删除。
站内所有资源仅供学习与参考,请勿用于商业用途,否则产生的一切后果将由您自己承担!

X