だいたいは読むより書く方が頻度少ないんだから、黙ってファイルの最初につけて書けばいいやんね。
my @list=<FH>; はよろしくないけどｗ