File Coverage

blib/lib/Data/Money/BaseException/InvalidCurrencyCode.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Data::Money::BaseException::InvalidCurrencyCode;
2              
3             $Data::Money::BaseException::InvalidCurrencyCode::VERSION = '0.18';
4             $Data::Money::BaseException::InvalidCurrencyCode::AUTHORITY = 'cpan:GPHAT';
5              
6             =head1 NAME
7              
8             Data::Money::BaseException::InvalidCurrencyCode - Exception handle for 'invalid currency code'.
9              
10             =head1 VERSION
11              
12             Version 0.18
13              
14             =cut
15              
16 8     8   160 use 5.006;
  8         31  
17 8     8   44 use Data::Dumper;
  8         16  
  8         402  
18              
19 8     8   53 use Moo;
  8         14  
  8         52  
20 8     8   2852 use namespace::clean;
  8         19  
  8         83  
21              
22             has error => (is => 'ro', default => sub { 'String is not a valid 3 letter currency code.' });
23              
24             with 'Data::Money::BaseException';
25              
26             =head1 DESCRIPTION
27              
28             B
29              
30             =head1 AUTHOR
31              
32             Cory G Watson, C<< >>
33              
34             Currently maintained by Mohammad S Anwar (MANWAR) C<< >>
35              
36             =head1 REPOSITORY
37              
38             L
39              
40             =head1 LICENSE AND COPYRIGHT
41              
42             Copyright 2010 Cory Watson
43              
44             This program is free software; you can redistribute it and/or modify it under the
45             terms of either: the GNU General Public License as published by the Free Software
46             Foundation; or the Artistic License.
47              
48             See L for more information.
49              
50             =cut
51              
52             1; # End of Data::Money::BaseException::InvalidCurrencyCode