>>122 ならこうかな。
perl -nle "1-$.||print'<PRE>'}continue{print}{print'</PRE>'"