$,="\n"; print split //, $phrase; #### perl -le 'print for split //, pop' "my phrase here"