perl简单连接

时间:2012-02-10 05:45:05

标签: perl

在下面的perl代码中如何将pwd与字符串连接起来。 在下文中,输出是两行不同的

   $pwd=`pwd`;
   my $string = $pwd . "/.somename";
   print "$string";

3 个答案:

答案 0 :(得分:6)

你刚刚做到了。恰好在中间有一个换行符。

$pwd=`pwd`;
chomp($pwd);
my $string = $pwd . "/.somename";
print "$string";

有人说......不要这样做。您应该使用cwd()

use Cwd;

my $string = cwd() . "/.somename";
print "$string\n";

答案 1 :(得分:2)

$pwd=`pwd`;
chomp $pwd;
my $string = $pwd . "/.somename";
print $string;

答案 2 :(得分:1)

使用chomp(),如下所示:

my $pwd = `pwd`;
chomp($pwd);
my $string = $pwd . "/.somename";
print "$string";

http://perldoc.perl.org/functions/chomp.html