File Coverage

blib/lib/Boxer/Role/Interact.pm
Criterion Covered Total %
statement 23 23 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod n/a
total 31 31 100.0


line stmt bran cond sub pod time code
1             package Boxer::Role::Interact;
2              
3             =encoding UTF-8
4              
5             =cut
6              
7 4     4   12083 use v5.14;
  4         16  
8 4     4   24 use utf8;
  4         9  
  4         55  
9 4     4   127 use Role::Commons -all;
  4         21  
  4         28  
10 4     4   8060 use namespace::autoclean 0.16;
  4         74  
  4         26  
11              
12 4     4   301 use Moo::Role;
  4         13  
  4         27  
13              
14 4     4   2209 use Types::Standard qw< Bool >;
  4         62402  
  4         58  
15              
16 4     4   3408 use strictures 2;
  4         32  
  4         166  
17 4     4   843 no warnings "experimental::signatures";
  4         10  
  4         676  
18              
19             =head1 VERSION
20              
21             Version v1.4.1
22              
23             =cut
24              
25             our $VERSION = "v1.4.1";
26              
27             has verbose => (
28             is => 'rw',
29             isa => Bool,
30             required => 1,
31             default => sub {0},
32             );
33              
34             has debug => (
35             is => 'rw',
36             isa => Bool,
37             required => 1,
38             default => sub {0},
39             );
40              
41             has dryrun => (
42             is => 'ro',
43             isa => Bool,
44             required => 1,
45             default => sub {0},
46             );
47              
48             =head1 AUTHOR
49              
50             Jonas Smedegaard C<< <dr@jones.dk> >>.
51              
52             =cut
53              
54             our $AUTHORITY = 'cpan:JONASS';
55              
56             =head1 COPYRIGHT AND LICENCE
57              
58             Copyright © 2013-2016 Jonas Smedegaard
59              
60             This is free software; you can redistribute it and/or modify it under
61             the same terms as the Perl 5 programming language system itself.
62              
63             =head1 DISCLAIMER OF WARRANTIES
64              
65             THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
66             WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
67             MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
68              
69             =cut
70              
71             1;