Sort::Key::Multi3pm

Usage

    use Sort::Key::Multi qw(sikeysort);
    my @data = qw(foo0 foo1 bar34 bar0 bar34 bar33 doz4)
    my @sisorted = sikeysort { /(\w+)(\d+)/} @data;

Overview

Sort::Key::Multi creates multi-key sorting subroutines and exports them to the caller package.

The names of the sorters are of the form "xxxkeysort" or "xxxkeysort_inplace", where "xxx" determines the number and types of the keys as follows:

For instance:

   use Key::Sort::Multi qw(iirskeysort
                           i2rskeysort
                           i_i_rs__keysort
                           i2rs_keysort);

exports to the caller package fourth identical sorting functions that take two integer keys that are sorted in ascending order and one string key that is sorted in descending order.

The generated sorters take as first argument a subroutine that is used to extract the keys from the values which are passed inside $_, for example:

  my @data = qw(1.3.foo 1.3.bar 2.3.bar 1.4.bar 1.7.foo);
  my @s = i2rs_keysort { split /\./, $_ } @data;

Copyright and license

Copyright (C) 2006, 2014 by Salvador Fandiño <[email protected]>

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.4 or, at your option, any later version of Perl 5 you may have available.