$/=\1;print,<>while<>