File Coverage

blib/lib/Data/Money/BaseException/MismatchCurrencyType.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::MismatchCurrencyType;
2              
3             $Data::Money::BaseException::MismatchCurrencyType::VERSION = '0.18';
4             $Data::Money::BaseException::MismatchCurrencyType::AUTHORITY = 'cpan:GPHAT';
5              
6             =head1 NAME
7              
8             Data::Money::BaseException::MismatchCurrencyType - Exception handle for 'mismatch currency type'.
9              
10             =head1 VERSION
11              
12             Version 0.18
13              
14             =cut
15              
16 8     8   193 use 5.006;
  8         34  
17 8     8   49 use Data::Dumper;
  8         20  
  8         509  
18              
19 8     8   52 use Moo;
  8         27  
  8         76  
20 8     8   3301 use namespace::clean;
  8         23  
  8         79  
21              
22             has error => (is => 'ro', default => sub { 'unable to perform arithmetic on different currency types' });
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::MismatchCurrencyType