sub reverseArray {
    my @arr = @_;
    for my $i (0 .. $#arr) {
        @{ $arr[$i] } = reverse @{ $arr[$i] };
    }
}