Hetula-Client

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "perl" : "5.020"
         }
      },
      "runtime" : {
         "requires" : {
            "Carp::Always" : "0",
            "Data::Printer" : "0",
            "English" : "0",
            "Getopt::Long" : "0",
            "IO::Prompter" : "0",
            "Modern::Perl" : "0",
            "Mojo::UserAgent" : "0",
            "Regexp::Common" : "0",
            "Storable" : "0",
            "autodie" : "0",
            "feature" : "0",
            "perl" : "5.020",
            "warnings" : "0"
         }
      },
      "test" : {

META.yml  view on Meta::CPAN

meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: Hetula-Client
requires:
  Carp::Always: '0'
  Data::Printer: '0'
  English: '0'
  Getopt::Long: '0'
  IO::Prompter: '0'
  Modern::Perl: '0'
  Mojo::UserAgent: '0'
  Regexp::Common: '0'
  Storable: '0'
  autodie: '0'
  feature: '0'
  perl: '5.020'
  warnings: '0'
resources:
  bugtracker: https://github.com/kivilahtio/libhetula-client-perl/issues
  homepage: https://github.com/kivilahtio/libhetula-client-perl

Makefile.PL  view on Meta::CPAN

  ],
  "LICENSE" => "gpl",
  "MIN_PERL_VERSION" => "5.020",
  "NAME" => "Hetula::Client",
  "PREREQ_PM" => {
    "Carp::Always" => 0,
    "Data::Printer" => 0,
    "English" => 0,
    "Getopt::Long" => 0,
    "IO::Prompter" => 0,
    "Modern::Perl" => 0,
    "Mojo::UserAgent" => 0,
    "Regexp::Common" => 0,
    "Storable" => 0,
    "autodie" => 0,
    "feature" => 0,
    "warnings" => 0
  },
  "TEST_REQUIRES" => {
    "File::Find" => 0,
    "File::Slurp" => 0,

Makefile.PL  view on Meta::CPAN

my %FallbackPrereqs = (
  "Carp::Always" => 0,
  "Data::Printer" => 0,
  "English" => 0,
  "File::Find" => 0,
  "File::Slurp" => 0,
  "File::Temp" => 0,
  "FindBin" => 0,
  "Getopt::Long" => 0,
  "IO::Prompter" => 0,
  "Modern::Perl" => 0,
  "Mojo::UserAgent" => 0,
  "Mojolicious" => 0,
  "Regexp::Common" => 0,
  "Storable" => 0,
  "Test::Compile" => 0,
  "Test::Most" => 0,
  "autodie" => 0,
  "feature" => 0,
  "lib" => 0,
  "warnings" => 0

bin/hetula-client  view on Meta::CPAN

# (at your option) any later version.
#
# Hetula is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You find a copy of the GNU General Public License
# here <http://www.gnu.org/licenses>.

use Modern::Perl;
use feature qw(signatures);
no warnings qw(experimental::signatures);

use Getopt::Long;
use Hetula::Client;
use Data::Printer;

use IO::Prompter {
  prompt_password => [-timeout=>120, -echo=>'*'],
  prompt_string   => [-timeout=>120],

lib/Hetula/Client.pm  view on Meta::CPAN

package Hetula::Client;

use Modern::Perl '2015';

our $VERSION = '0.008';

# ABSTRACT: Interface with Hetula
#
# Copyright 2018 National Library of Finland

=encoding utf8

=head1 NAME

lib/Hetula/Client.pm  view on Meta::CPAN

 my $ssnGetResp = $hc->ssnGet({id => 1});
 ok(! $ssnGetResp->{error}, "SSN got");

 my $ssnsBatchAddResp = $hc->ssnsBatchAdd(['101010-101A', '101010-102B']);
 is(@$ssnsBatchAddResp, 2, "SSNs batch add");

=cut

##Pragmas
use Modern::Perl;
use feature qw(signatures);
no warnings qw(experimental::signatures);
use Carp::Always;
use autodie;
use English; #Use verbose alternatives for perl's strange $0 and $\ etc.

##External modules
use Mojo::UserAgent;
use Storable;
use Regexp::Common;

t/00-load.t  view on Meta::CPAN

#!/usr/bin/env perl
use Modern::Perl '2015';

use FindBin;
use lib "$FindBin::Bin/../lib";

use Test::Most;
use Test::Compile;

use File::Find;

t/01-usage.t  view on Meta::CPAN

#!/usr/bin/env perl
use Modern::Perl '2015';
#use feature qw(signatures);
#no warnings qw(experimental::signatures);

use FindBin;
use lib "$FindBin::Bin/../lib";

use Test::Most tests => 15;

use Mojolicious;
use File::Slurp;