Help for this page

Select Code to Download


  1. or download this
    use Sort::Key qw(ikeysort);
my @unordered = (qw/very_long short/);
my @ordered = ikeysort { length } @unordered;
  2. or download this
    use Sort::Key::Maker sort_len => sub { length } , qw(integer);
my @unordered = (qw/very_long short/);
my @ordered = sort_len @unordered;