@array = ("A","B","C","D");
という配列から、簡単に
"ABCD"という内容の変数$testをつくりたいと思うのですが、

@array = ("A","B","C","D");
foreach $item (@array){
	$test .= $item;
}

という方法しか思いつきません。
ひょっとして、一文で実現できるような方法があるのでしょうか。

とても初歩的な質問かもしれませんが、私がもっているPerlの入門書には解説がありません。
よろしくお願いします。

#!/usr/bin/perl

my @array = ('A','B','C','D');
my $a = join('', @array);

print "Content-type: text/html\n\n";
print $a;
exit;

まさ さん、レスありがとうございます。

あぁ、そうか！
joinって、データファイルに書き出すときにしか、使っていなかったので、
配列をつなげられることに気づきませんでした。

どうもありがとうございました。
大変助かりました。