You can use the "map" command to munge the array around. For instance:
$m = [
[1, 2, 3, 4, 5, 6, 7, 8, 9, 10],
[11,12,13,14,15,16,17,18,19,20],
[91,92,93,94,95,96,97,98,99,100],
];
@col5 = map {$_->[5]} @$m;
print join("\n", @col5);
On Tuesday 27 May 2003 08:26 am, Wojciech Pietron wrote:
> Hi,
>
> there is a matrix:
>
> $m = [
> [1, 2, 3, 4, 5, 6, 7, 8, 9, 10],
> [11,12,13,14,15,16,17,18,19,20],
> ...
> [91,92,93,94,95,96,97,98,99,100],
> ];
>
> Are there any clever methods (without loops) to return
> n-th column from such a structure?
>
> Best regards,
> Wojciech Pietron
> _______________________________________________
> Perl-Unix-Users mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
--
Michael A Nachbaur <[EMAIL PROTECTED]>
_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
