To generalize: reading a Schwartzian Transform @data_out = map { $_->[1] } # output field(s) sort { $a->[0] cmp $a->[0] } # sort field map { [func($_), $_] } @data_in; # input fields and data