Here's a 2D example, using neat Perl syntax:

#!/usr/bin/perl

use strict;
use warnings;

my @x;


for my $i (0..3) {
   for my $j (0..3) {
       $x[$i][$j]=int rand 10;
   }
}

for my $i (0..3) {
   for my $j (0..3) {
      print $x[$i][$j]," ";
   }
   print "\n";
}

exit;
[download]

Extending this to three dimensions is trivially easy, just add another set of brackets after [$j], but then printing it gets harder. Read perllol

HTH,
SSF