perlで質問があります。

名前<区切り文字>住所<区切り文字>年齢<区切り文字>…
・上のように区切られた要素をいくつも持つ配列を、名前、住所、年齢のそれぞれでソートするにはどうすればいいでしょうか？
・この配列名がlistだとして、
pen(OUT, "> out.txt");
print(OUT "@list");
close(OUT);
とすると、1行目は上のような書式で出力されますが2行目以降は行頭に半角スペースがついてしまいます。何故でしょうか？