$\^=$_ for<>=~/./g;print