$/=\1;print<>.$_ while<>