my @unsorted = ( [8,9,10], [6,5,4], [7,8,9] ); foreach my $inner(@unsorted) { $inner = [ reverse @{ $inner } ]; }