File Coverage

blib/lib/Business/Giropay/Role/Core.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Business::Giropay::Role::Core;
2              
3             =head1 NAME
4              
5             Business::Giropay::Role::Core - common attributes consumed by several classes and roles
6              
7             =cut
8              
9 5     5   2027 use Business::Giropay::Types qw/Bool Enum HashRef Int Str/;
  5         6  
  5         30  
10 5     5   3132 use Carp;
  5         8  
  5         214  
11              
12 5     5   15 use Moo::Role;
  5         5  
  5         22  
13              
14             =head1 ATTRIBUTES
15              
16             =head2 merchantId
17              
18             The Giropay merchant ID.
19              
20             =cut
21              
22             has merchantId => (
23             is => 'ro',
24             isa => Int,
25             required => 1,
26             );
27              
28             =head2 projectId
29              
30             The Giropay project ID.
31              
32             =cut
33              
34             has projectId => (
35             is => 'ro',
36             isa => Int,
37             required => 1,
38             );
39              
40             =head2 sandbox
41              
42             Defaults to false. Set this to true during testing. This provides very limited
43             protection since Giropay test transactions are routed through the same server
44             as real transactions. B
45              
46             =cut
47              
48             has sandbox => (
49             is => 'ro',
50             isa => Bool,
51             default => 0,
52             );
53              
54             =head2 secret
55              
56             The Giropay shared secret for this L and L,
57              
58             =cut
59              
60             has secret => (
61             is => 'ro',
62             isa => Str,
63             required => 1,
64             );
65              
66             1;