Locale-Utils-PlaceholderBabelFish

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

      "perl_5"
   ],
   "meta-spec" : {
      "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
      "version" : "2"
   },
   "name" : "Locale-Utils-PlaceholderBabelFish",
   "prereqs" : {
      "build" : {
         "requires" : {
            "Test::Differences" : "0.60",
            "Test::Exception" : "0",
            "Test::More" : "0",
            "Test::NoWarnings" : "0"
         }
      },
      "runtime" : {
         "recommends" : {
            "Test::Pod" : "1.14",
            "Test::Pod::Coverage" : "1.04"
         },

META.yml  view on Meta::CPAN

---
abstract: 'Locale::Utils::PlaceholderBabelFish - Utils to expand BabelFish palaceholders'
author:
  - 'Steffen Winkler <steffenw at cpan.org>'
build_requires:
  Test::Differences: '0.60'
  Test::Exception: '0'
  Test::More: '0'
  Test::NoWarnings: '0'
dynamic_config: 1
generated_by: 'Module::Build version 0.4218, CPAN::Meta::Converter version 2.150005'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: Locale-Utils-PlaceholderBabelFish

Makefile.PL  view on Meta::CPAN

                   'Test::NoWarnings' => 0,
                   'MooX::StrictConstructor' => 0,
                   'MooX::Types::MooseLike::Base' => 0,
                   'Moo' => '1.003001',
                   'Test::Exception' => 0,
                   'namespace::autoclean' => 0,
                   'List::Util' => 0,
                   'HTML::Entities' => 0,
                   'Scalar::Util' => 0,
                   'Test::More' => 0,
                   'Test::Differences' => '0.60',
                   'Carp' => 0
                 },
  'NAME' => 'Locale::Utils::PlaceholderBabelFish',
  'VERSION_FROM' => 'lib/Locale/Utils/PlaceholderBabelFish.pm',
  'INSTALLDIRS' => 'site'
)
;

t/03_expand_named.t  view on Meta::CPAN

#!perl -T

use strict;
use warnings;

use Test::More tests => 11;
use Test::NoWarnings;
use Test::Differences;
BEGIN {
    use_ok 'Locale::Utils::PlaceholderBabelFish';
}

my $obj = Locale::Utils::PlaceholderBabelFish->new;

is_deeply
    [ $obj->expand_babel_fish ],
    [ undef ],
    'undef';

t/04_modifier_code.t  view on Meta::CPAN

#!perl -T

use strict;
use warnings;

use Test::More tests => 4;
use Test::NoWarnings;
use Test::Differences;

BEGIN {
    use_ok 'Locale::Utils::PlaceholderBabelFish';
}

my $obj = Locale::Utils::PlaceholderBabelFish->new(
    modifier_code => sub {
        my ($value, $attributes) = @_;
        if ( $attributes =~ m{ \b int \b }xms ) {
            return int $value;

t/05_expand_plural.t  view on Meta::CPAN

#!perl -T

use strict;
use warnings;

use Test::More tests => 13;
use Test::NoWarnings;
use Test::Differences;
BEGIN {
    use_ok 'Locale::Utils::PlaceholderBabelFish';
}

my $obj = Locale::Utils::PlaceholderBabelFish->new;

# parameter types
eq_or_diff
    $obj->expand_babel_fish(
        '((#{count} s))',

t/11_test_examples.t  view on Meta::CPAN

#!perl

use strict;
use warnings;

use Test::More;
use Test::Differences;
use charnames qw(:full);
use Cwd qw(getcwd chdir);
use English qw(-no_match_vars $CHILD_ERROR);

$ENV{AUTHOR_TESTING}
    or plan skip_all => 'Set $ENV{AUTHOR_TESTING} to run this test.';

my @data = (
    {
        test   => '01_expand_babel_fish',