use Sort::Key::OID qw(oidsort); my @sorted = oidsort @data; [download]
In reply to Re: a sort question by salva in thread a sort question by Anonymous Monk