See the References Quick Reference. Basically, if you want to get at the array from a reference $ref you want @{ $ref }. So in a foreach-loop:

foreach my $row (@{ $data }) {
    print "-- New row\n";
    foreach my $col (@{ $row }) {
        print $col,"\n";
    };
};
[download]