s/^1?\d/$&-print/efor(<>)x$=