Sort::Sub::by_last_num_in_text - Sort by last number found in text or (if no number is found) ascibetically
This document describes version 0.120 of Sort::Sub::by_last_num_in_text (from Perl distribution Sort-Sub), released on 2020-05-25.
Generate sorter (accessed as variable) via Sort::Sub import:
use Sort::Sub '$by_last_num_in_text'; # use '$by_last_num_in_text<i>' for case-insensitive sorting, '$by_last_num_in_text<r>' for reverse sorting my @sorted = sort $by_last_num_in_text ('item', ...);
Generate sorter (accessed as subroutine):
use Sort::Sub 'by_last_num_in_text<ir>'; my @sorted = sort {by_last_num_in_text} ('item', ...);
Generate directly without Sort::Sub:
use Sort::Sub::by_last_num_in_text; my $sorter = Sort::Sub::by_last_num_in_text::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 by_last_num_in_text % some-cmd | sortsub by_last_num_in_text --ignore-case -r
The generated sort routine will sort by last number (sequence of [0-9]) found in text or (f no number is found in text) ascibetically. Items that have a number will sort before items that do not.
This is nifty for something like (sortsub is CLI front-end for Sort::Sub):
% ls christophe willem - cafeine (2009)/ christophe willem - inventaire (2007)/ christophe willem - parait-il (2014)/ christophe willem - prismophonic (2011)/ % ls | sortsub last_num_in_text christophe willem - inventaire (2007)/ christophe willem - cafeine (2009)/ christophe willem - prismophonic (2011)/ christophe willem - parait-il (2014)/
Please visit the project's homepage at https://metacpan.org/release/Sort-Sub.
Source repository is at https://github.com/perlancar/perl-Sort-Sub.
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.
Sort::Sub
Sort::Sub::by_first_num_in_text
perlancar <perlancar@cpan.org>
This software is copyright (c) 2020, 2019, 2018, 2016, 2015 by perlancar@cpan.org.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
To install Sort::Sub, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Sort::Sub
CPAN shell
perl -MCPAN -e shell install Sort::Sub
For more information on module installation, please visit the detailed CPAN module installation guide.