print join "\n", split(//, $phrase);