You need a recursive solution to reverse internal array references. You'll have to check for them with the ref operator. The following (untested) code might come in handy.

sub reverse_array {
    my $arr_ref = shift;
    my $rev_array = [];
    foreach my $item (@$arr_ref) {
        if (ref($item) eq 'ARRAY') {
            $item = reverse_array($item);
        }
        unshift @$rev_array, $item;
    }
    return $rev_array;
}
[download]

Originally posted as a Categorized Answer.