Perl的两个小技巧

今天碰巧用到,觉得挺有用的: 用Perl获得当前目录的路径名: use Cwd; print getcwd; 打印变量值到屏幕的同时,保存到一个变量里: print $str = ‘foo bar’; 当然,