my $a = 'whatever';
@arr2 = sort { $::a <=> $::b } @arr1;