my @flatarray; foreach (@twodimarray) { foreach my $element (@$_) { push @flatarray, $element; } } # for numeric data @flatarray = sort { $a <=> $b } @flatarray;