App-Greple-wordle

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

      "runtime" : {
         "requires" : {
            "App::Greple" : "8.58",
            "Date::Calc" : "0",
            "Getopt::EX" : "v2.1.1",
            "Getopt::EX::Hashed" : "1.05",
            "List::MoreUtils" : "0",
            "List::Util" : "0",
            "Mo" : "0",
            "Text::VisualWidth::PP" : "0.05",
            "Try::Tiny" : "0",
            "perl" : "v5.14.0"
         }
      },
      "test" : {
         "requires" : {
            "Test::More" : "0.98"
         }
      }
   },
   "provides" : {

META.yml  view on Meta::CPAN

    file: lib/App/Greple/wordle/word_hidden.pm
requires:
  App::Greple: '8.58'
  Date::Calc: '0'
  Getopt::EX: v2.1.1
  Getopt::EX::Hashed: '1.05'
  List::MoreUtils: '0'
  List::Util: '0'
  Mo: '0'
  Text::VisualWidth::PP: '0.05'
  Try::Tiny: '0'
  perl: v5.14.0
resources:
  bugtracker: https://github.com/kaz-utashiro/greple-wordle/issues
  homepage: https://github.com/kaz-utashiro/greple-wordle
  repository: https://github.com/kaz-utashiro/greple-wordle.git
version: '0.12'
x_authority: cpan:UTASHIRO
x_contributors:
  - 'Kazumasa Utashiro <kaz@utashiro.com>'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

cpanfile  view on Meta::CPAN

requires 'perl', '5.014';

requires 'App::Greple', '8.58';
requires 'Getopt::EX', '2.1.1';
requires 'Getopt::EX::Hashed', '1.05';
requires 'List::Util';
requires 'List::MoreUtils';
requires 'Date::Calc';
requires 'Try::Tiny';
requires 'Text::VisualWidth::PP', '0.05';
requires 'Mo';

on 'test' => sub {
    requires 'Test::More', '0.98';
};

lib/App/Greple/wordle.pm  view on Meta::CPAN

package App::Greple::wordle;
use v5.14;
use warnings;
use utf8;

our $VERSION = "0.12";

use Data::Dumper;
use List::Util qw(shuffle max);
use Try::Tiny;
use Getopt::EX::Colormap qw(colorize ansi_code);
use Text::VisualWidth::PP 0.05 'vwidth';
use App::Greple::wordle::word_all    qw(@word_all %word_all);
use App::Greple::wordle::word_hidden qw(@word_hidden);
use App::Greple::wordle::game;
use App::Greple::wordle::util qw();

use Getopt::EX::Hashed; {
    Getopt::EX::Hashed->configure( DEFAULT => [ is => 'rw' ] );
    has answer  => '   =s ' , default => $ENV{WORDLE_ANSWER} ;