配列をカンマで区切ってprintする [Perl]

print @array;

などとしただけでは空白区切りなので、$”に区切り文字を代入します。

サンプル

#!/usr/bin/perl
@array=(1,2,3,4,5);
$”=”,”;
print “@array”;

実行結果

1,2,3,4,5

なお、ダブルコーテーションで囲わないと展開されないので12345と表示されます。

カンマではなく、タブや\nで区切ることも当然可能。