Perlコーディング初心者質問スレ Part 59

[0933 nobodyさん 2009/08/24(月) 15:16:07 ID:???]

>>932
パズルの問題でもつくっているのか？
変数毎に検証すれば何も難しくないと思うが。

$a = '1002';
$b = "\n002001";
これで、望み通りの結果だ。

print "$a$b"; # => 1002\n002001
print "$a<>$b"; # => 1002<>\n002001
chomp $a;
print "$a$b"; # => 1002\n002001
chop $a;
print "$a$b"; # => 100\n002001