Branch Coverage

blib/lib/Locale/Object/Currency.pm
Criterion Covered Total %
branch 29 34 85.2


line true false branch
29 0 376 unless scalar keys %params == 1
40 0 376 unless exists $allowed_params{$parameter}
46 363 13 if ($parameter eq 'country_code') { }
12 1 elsif ($parameter eq 'code') { }
63 0 376 unless $result
65 375 1 if (defined @{$result;}[0]) { }
77 87 288 if $currency
112 0 288 unless my $code = $self->code
148 0 8 unless $self->{'_name'}
151 5 3 unless $self->{'_countries'}
154 6 2 if wantarray
194 288 302 if (@_)
207 288 4 if (@_)
220 288 1 if (@_)
233 288 1 if (@_)
246 288 1 if (@_)
259 288 1 if (@_)