my $sorter = make_sorter( qw( plain ), number => [ code => '/(\d+)/', 'descending', ], ) ; my @sorted = $sorter->( @unsorted ) ;