I knew this question seemed familiar: read multi lines of a file in perl -- well remembered brother Anonymous Monk.

Same OP, too !

For a moment there I thought this might be coursework. Looks as though the previous answers failed to grasp the subtlety of the problem ?