Help for this page

Select Code to Download


  1. or download this
    use Sort::Key::Multi qw(n2_keysort);
    my @data = <>;
    my @sorted = n2_keysort { (split)[1, 0] } @data;
    print @sorted;
    
  2. or download this
    use Sort::Key::Multi qw(rnn_keysort);
    my @data = <>;
    my @sorted = rnn_keysort { (split)[1, 0] } @data;
    print @sorted;