@array = ( [ "foo", "bar"],
           [ "abc", "def"] );

##</code><code>##

while ( <FILE> ) {
    push @array, [ split ];
}

##</code><code>##

for $i (0..$#array) {
    for $j (0..$#{$array[$i]}) {
        print "Element $j of project $i is $array[$i][$j]\n";
    }
}