I'm confused by your 88888 to read blocks (maybe because I'm not seeing it in your data), as far as creating multi-diminsional arrays, they aren't really supported in Perl but you can duplicate the functionality using references.

Could I do something like $Block[0] = @datavertex[0];? SO that I can have $Block[0][0][1]

Not really, use references. Something like this would do it:

my @array = qw(oranges bannanas apples kiwi);
my @array2 = ();
$array2[0] = \@array;
my @array3 = ();
$array3[0] = \@array2;
# ad nausium ...
[download]

So now you could dereference and get 'oranges' from the third array my $fruit = $array3[0]->[0]->[0];

Also if you're using a loop to set up that same structure you can do it in one statement, like this (assuming you already defined array3:

$array3[0] = [['oranges','bannanas','apples','kiwi']];

# and multiple ones like this
$array3[0] = [['oranges','bannanas'],['apples','kiwi']];
[download]

I hope that gives you a better idea, I'm not understanding exactly what it is your doing, maybe if you provide some of the data I could give you a better example.

Chris

Lobster Aliens Are attacking the world!