１，ファイルから一行づつ読み込む
２，if(空行なら) {
３，　配列xをソートして出力;
４，　配列xは初期化;
５，} else {
６，　読み込んだ行を配列xに追加;
７，}
というのが作りたいんですが、なかなかうまく逝きません。
とりあえず中間的に
@xx = ();
while(<>) {
push(@xx, <>);
}
print $xx[2];
と書いてみて、二行目を出力するかどうか試したんですが、駄目です。
どなたかお助けください。