NAME

Sort::Sub::record_by_order

VERSION

This document describes version 0.120 of Sort::Sub::record_by_order (from Perl distribution Sort-Sub), released on 2020-05-25.

SYNOPSIS

Generate sorter (accessed as variable) via Sort::Sub import:

 use Sort::Sub '$record_by_order'; # use '$record_by_order<i>' for case-insensitive sorting, '$record_by_order<r>' for reverse sorting
 my @sorted = sort $record_by_order ('item', ...);

Generate sorter (accessed as subroutine):

 use Sort::Sub 'record_by_order<ir>';
 my @sorted = sort {record_by_order} ('item', ...);

Generate directly without Sort::Sub:

 use Sort::Sub::record_by_order;
 my $sorter = Sort::Sub::record_by_order::gen_sorter(
     ci => 1,      # default 0, set 1 to sort case-insensitively
     reverse => 1, # default 0, set 1 to sort in reverse order
 );
 my @sorted = sort $sorter ('item', ...);

Use in shell/CLI with sortsub (from App::sortsub):

 % some-cmd | sortsub record_by_order
 % some-cmd | sortsub record_by_order --ignore-case -r

DESCRIPTION

Sort by the order of records. This sorter expects $a and $b to be records of:

 [$data, $order]

instead of just:

 $data

It then performs:

 $a->[1] <=> $b->[1]

HOMEPAGE

Please visit the project's homepage at <https://metacpan.org/release/Sort-Sub>.

SOURCE

Source repository is at <https://github.com/perlancar/perl-Sort-Sub>.

BUGS

Please report any bugs or feature requests on the bugtracker website <https://rt.cpan.org/Public/Dist/Display.html?Name=Sort-Sub>

When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.

AUTHOR

perlancar <perlancar@cpan.org>

COPYRIGHT AND LICENSE

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.