@AoA = (
[ "n1", "34" ],
[ "n3", "14" ],
[ "n2", "1" ],
[ "n4", "5" ],
);

##</code><code>##

@sorted = (
[ "n2", "1" ],
[ "n4", "5" ],
[ "n3", "14" ],
[ "n1", "34" ],
);

##</code><code>##

@sorted = map { [ $_[0], $_[1] ] } sort { $a->[1] <=> $b->[1] } map { [ $_[0], $_[1] ] } @AoA;