in reply to Transposing an Array

<!--PLEASE TRY THESE CODE> <!--THE ABOVE INFORMED IN ANONYMOUS IS GUBE> 
use strict;

my($input,@input);

$input = <STDIN>;

@input = split(//, $input);

$" ="\n";

print "@input";

[download]

Replies are listed 'Best First'.
Re^2: Transposing an Array
by JustLikeThat (Initiate) on Nov 15, 2004 at 15:24 UTC
    Thanks for the idea, but I don't quite understand what <code> $"="\n"; <code> is from. I haven't see it in Learning Perl and I'll have to read how it works with the string. It is a nice trick, it seems like a shortcut to concatenate a common command to every string in the array.
[reply]
[reply]

In Section Seekers of Perl Wisdom