そうか
print @list ,"hogehoge"
これは動作的には
print @list;print "hogehoge";
じゃなくて
$buf = (@list ,"hogehoge");
print $buf;
ってことをやってるのかな、なるほどなるほど