Re: how to use two dimensional array?

You may find this syntax for convenient.

use strict;
use warnings;
my @array = (
    [1,2],
    [7,5],
    [4,4],
    [2,2],
    [0,7],
    [3,4],
    [8,9],
    [3,6],
    [5,7],
    [7,2],
);
foreach my $pair (@array) {
    my ($x, $y) = @$pair;
    print "$x $y \n";
}
[download]

Bill

Comment on Re: how to use two dimensional array? Download Code

Replies are listed 'Best First'.
Re^2: how to use two dimensional array? by hbm (Hermit) on Jun 14, 2013 at 11:52 UTC
One of my favorite tidbits of the language - instead of your for loop: `print "@$_\n" for @array;` [download]	[reply] [d/l]
Re^3: how to use two dimensional array? by BillKSmith (Monsignor) on Jun 14, 2013 at 13:02 UTC
Very clever way of getting the same output, but I do not think it answers the original question. Also note your dependence om the default value of the special variable $LIST_SEPARATOR ($"). Bill	[reply]