在perl的程序当中，有时候会用到当前的系统路径。

在perl的程序当中，有时候会用到当前的系统路径。

perl中获取当前李靖有两种方法：
1、使用CWD包

use Cwd;
print getcwd;

2、使用环境变量

print $ENV{'PWD'}

我更倾向于使用环境变量，这样不会引入额外的包

3.使用shell命令

          print system（“pwd”）；