App-wordlist

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

0.289   2022-08-20  Released-By: PERLANCAR; Urgency: low

        - No functional changes.

        - [cli wordlist-wordle] Tweak examples.


0.288   2022-08-20  Released-By: PERLANCAR; Urgency: medium

        - [bugfix] Fix wordlist-wordle, allow multiple guesses.


0.287   2022-08-20  Released-By: PERLANCAR; Urgency: medium

        - [bugfix] Fix --chars-unordered which previously never matched.

        - Add CLI: wordlist-wordle.


0.286   2022-08-20  Released-By: PERLANCAR; Urgency: medium

lib/App/wordlist.pm  view on Meta::CPAN

(2 letters with the incorrect position and 1 letter in the correct position),
you can use:

    % wordlist -w EN::Wordle --chars-unordered wts --len 5 '/^...s.$/'

Included in the distribution is the <prog:wordlist-wordle> script for
convenience. This CLI defaults to grepping the "EN::Wordle" wordlist and you
specify something like `wt_S_` for the pattern (lowercase for letter in
incorrect position, uppercase for letter in correct position, underscore for
unguessed):

    % wordlist-wordle 'wt_S_'

_
};
sub wordlist {
    require Encode;
    require Module::Load::Util;

    my %args = @_;

script/_wordlist  view on Meta::CPAN

our $DATE = '2025-03-07'; # DATE
our $DIST = 'App-wordlist'; # DIST
our $VERSION = '0.295'; # VERSION
die "Please run this script under shell completion\n" unless $ENV{COMP_LINE} || $ENV{COMMAND_LINE};

# require extra modules
use App::wordlist ();

my $args = {load_module=>["App::wordlist"],program_name=>"wordlist",read_config=>0,read_env=>0,skip_format=>undef,subcommands=>undef,url=>"/App/wordlist/wordlist"};

my $meta = {_orig_args_as=>undef,_orig_result_naked=>undef,args=>{action=>{cmdline_aliases=>{L=>{code=>sub{package App::wordlist;use warnings;use strict;no feature;use feature ':5.10';my $args = shift();$$args{'action'} = 'list_cpan'},is_flag=>1,summ...

my $sc_metas = {};

my $copts = {format=>{default=>undef,description=>"\nOutput can be displayed in multiple formats, and a suitable default format is\nchosen depending on the application and/or whether output destination is\ninteractive terminal (i.e. whether output is...

my $r = {common_opts=>$copts};

# get words
my $shell;
my ($words, $cword);

script/wordlist  view on Meta::CPAN

# load modules


### declare global variables

our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
our $DATE = '2025-03-07'; # DATE
our $DIST = 'App-wordlist'; # DIST
our $VERSION = '0.295'; # VERSION

my $_pci_metas = {""=>{args=>{action=>{cmdline_aliases=>{L=>{code=>sub{"DUMMY"},is_flag=>1,summary=>"List WordList::* modules on CPAN"},l=>{code=>sub{"DUMMY"},is_flag=>1,summary=>"List installed WordList::* modules"},s=>{code=>sub{"DUMMY"},is_flag=>1...

our $_pci_log_outputs = {};
our $_pci_meta_result_stream = 0;
our $_pci_meta_result_type;
our $_pci_meta_result_type_is_simple;
our $_pci_meta_skip_format = 0;
our $_pci_r = {naked_res=>0,read_config=>1,read_env=>1,subcommand_name=>""};
our %_pci_args;

### begin code_before_enable_logging

script/wordlist  view on Meta::CPAN

(2 letters with the incorrect position and 1 letter in the correct position),
you can use:

 % wordlist -w EN::Wordle --chars-unordered wts --len 5 '/^...s.$/'

Included in the distribution is the L<wordlist-wordle> script for
convenience. This CLI defaults to grepping the "EN::Wordle" wordlist and you
specify something like C<wt_S_> for the pattern (lowercase for letter in
incorrect position, uppercase for letter in correct position, underscore for
unguessed):

 % wordlist-wordle 'wt_S_'

=head1 CONFIGURATION FILE

This script can read configuration files. Configuration files are in the format of L<IOD>, which is basically INI with some extra features.

By default, these names are searched for configuration filenames (can be changed using C<--config-path>): F<~/.config/wordlist.conf>, F<~/wordlist.conf>, or F</etc/wordlist.conf>.

All found files will be read and merged.

script/wordlist  view on Meta::CPAN

#
#(2 letters with the incorrect position and 1 letter in the correct position),
#you can use:
#
#    % wordlist -w EN::Wordle --chars-unordered wts --len 5 '/^...s.$/'
#
#Included in the distribution is the <prog:wordlist-wordle> script for
#convenience. This CLI defaults to grepping the "EN::Wordle" wordlist and you
#specify something like `wt_S_` for the pattern (lowercase for letter in
#incorrect position, uppercase for letter in correct position, underscore for
#unguessed):
#
#    % wordlist-wordle 'wt_S_'
#
#_
#};
#sub wordlist {
#    require Encode;
#    require Module::Load::Util;
#
#    my %args = @_;