>>129
@list = <$fh>;
とかやって配列で扱う
pushとpopでぽぽぽぽーん