App-td

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

          spec.


0.05    2016-04-14  Released-By: PERLANCAR

        - Add/implement actions 'info', 'sum', 'sum-row', 'avg', 'avg-row'.


0.04    2016-03-09  Released-By: PERLANCAR

	- Replace JSON::XS with Cpanel::JSON::XS.


0.03    2015-12-07  Released-By: PERLANCAR

	- No functional changes.

	- Typo.


0.02    2015-11-02  Released-By: PERLANCAR

META.json  view on Meta::CPAN

         "x_spec" : {
            "Rinci" : "v1.1.102"
         }
      },
      "runtime" : {
         "recommends" : {
            "Text::CSV_XS" : "0"
         },
         "requires" : {
            "Array::Sample::WeightedRandom" : "0.004",
            "Cpanel::JSON::XS" : "0",
            "Data::Check::Structure" : "0.050",
            "Data::Sah::Compiler::perl::TH::array" : "0.914",
            "Data::Sah::Compiler::perl::TH::bool" : "0.914",
            "Data::Sah::Compiler::perl::TH::str" : "0.914",
            "Data::TableData::Object::aoaos" : "0.116",
            "Data::TableData::Object::aohos" : "0.116",
            "Data::TableData::Object::aos" : "0.116",
            "Data::TableData::Object::hash" : "0.116",
            "List::MoreUtils" : "0",
            "Perinci::CmdLine::Any" : "0.154",

META.json  view on Meta::CPAN

            "is_trial" : 0
         },
         "version" : "6.031"
      }
   },
   "x_authority" : "cpan:PERLANCAR",
   "x_contributors" : [
      "Steven Haryanto <stevenharyanto@gmail.com>"
   ],
   "x_generated_by_perl" : "v5.38.2",
   "x_serialization_backend" : "Cpanel::JSON::XS version 4.37",
   "x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later",
   "x_static_install" : 1
}

META.yml  view on Meta::CPAN

  version: '1.4'
name: App-td
provides:
  App::td:
    file: lib/App/td.pm
    version: '0.112'
recommends:
  Text::CSV_XS: '0'
requires:
  Array::Sample::WeightedRandom: '0.004'
  Cpanel::JSON::XS: '0'
  Data::Check::Structure: '0.050'
  Data::Sah::Compiler::perl::TH::array: '0.914'
  Data::Sah::Compiler::perl::TH::bool: '0.914'
  Data::Sah::Compiler::perl::TH::str: '0.914'
  Data::TableData::Object::aoaos: '0.116'
  Data::TableData::Object::aohos: '0.116'
  Data::TableData::Object::aos: '0.116'
  Data::TableData::Object::hash: '0.116'
  List::MoreUtils: '0'
  Perinci::CmdLine::Any: '0.154'

Makefile.PL  view on Meta::CPAN

  },
  "DISTNAME" => "App-td",
  "EXE_FILES" => [
    "script/td"
  ],
  "LICENSE" => "perl",
  "MIN_PERL_VERSION" => "5.010001",
  "NAME" => "App::td",
  "PREREQ_PM" => {
    "Array::Sample::WeightedRandom" => "0.004",
    "Cpanel::JSON::XS" => 0,
    "Data::Check::Structure" => "0.050",
    "Data::Sah::Compiler::perl::TH::array" => "0.914",
    "Data::Sah::Compiler::perl::TH::bool" => "0.914",
    "Data::Sah::Compiler::perl::TH::str" => "0.914",
    "Data::TableData::Object::aoaos" => "0.116",
    "Data::TableData::Object::aohos" => "0.116",
    "Data::TableData::Object::aos" => "0.116",
    "Data::TableData::Object::hash" => "0.116",
    "List::MoreUtils" => 0,
    "Perinci::CmdLine::Any" => "0.154",

Makefile.PL  view on Meta::CPAN

  },
  "VERSION" => "0.112",
  "test" => {
    "TESTS" => "t/*.t"
  }
);


my %FallbackPrereqs = (
  "Array::Sample::WeightedRandom" => "0.004",
  "Cpanel::JSON::XS" => 0,
  "Data::Check::Structure" => "0.050",
  "Data::Sah::Compiler::perl::TH::array" => "0.914",
  "Data::Sah::Compiler::perl::TH::bool" => "0.914",
  "Data::Sah::Compiler::perl::TH::str" => "0.914",
  "Data::TableData::Object::aoaos" => "0.116",
  "Data::TableData::Object::aohos" => "0.116",
  "Data::TableData::Object::aos" => "0.116",
  "Data::TableData::Object::hash" => "0.116",
  "File::Spec" => 0,
  "IO::Handle" => 0,

dist.ini  view on Meta::CPAN

:version=0.606

[Prereqs / TestRequires]
;Test::More=0.98

[Prereqs]
perl=5.010001
strict=0
warnings=0
Array::Sample::WeightedRandom=0.004
Cpanel::JSON::XS=0
Data::Check::Structure=0.050
Data::TableData::Object::aoaos=0.116
Data::TableData::Object::aohos=0.116
Data::TableData::Object::aos=0.116
Data::TableData::Object::hash=0.116
List::MoreUtils=0
PerlX::Maybe=0
Pipe::Find=0
Scalar::Util=0

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

            maybe _align  => $tfa->[$i],
            maybe _format => $tff->[$i],
            maybe _unit   => $tfu->[$i],
        };
        $i++;
    }
    $spec;
}

sub _decode_json {
    require Cpanel::JSON::XS;

    state $json = Cpanel::JSON::XS->new->allow_nonref;
    $json->decode(shift);
}

sub _get_td_obj {
    require Data::Check::Structure;

    my $input = shift;
    my ($input_form, $input_obj, $input_form_err);

  CHECK_STRUCT: {