/.
1/,print$`=~s'@i'0/<>=~$/;$`'gerwhile$_.=<>