in reply to Transposing an Array

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

[download]

Replies are listed 'Best First'.
Re^2: Transposing an Array
by rev_1318 (Chaplain) on Nov 11, 2004 at 22:27 UTC
    Or:
    $,="\n";
print split //, $phrase;

    [download]
    to avoid the join :-)
    BTW, a one-liner could be:
    perl -le 'print for split //, pop' "my phrase here"

    [download]
    Paul
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom