Branch Coverage

blib/lib/Finance/Currency/Convert/BChile.pm
Criterion Covered Total %
branch 9 34 26.4


line true false branch
62 0 6 unless $self->{'ua'} = 'LWP::UserAgent'->new
84 5 0 if ($simulate)
93 0 0 unless ($response->is_success)
101 0 0 unless my $p = 'HTML::TokeParser'->new(\$response->content)
107 0 0 unless $token->[1]{'id'} eq 'ind-dia'
110 0 0 unless $token2->[1]{'class'} eq 'published-date'
114 0 0 unless $token2->[1]{'id'} eq 'Lbl_fecha'
120 0 0 unless $token2->[1]{'id'} eq 'RptListado_ctl03_lbl_valo'
126 0 0 unless $dolar and $fecha
127 0 0 unless $dolar =~ /^\d+[,.]{0,1}\d+$/
176 0 2 unless $valor
177 0 2 unless $valor =~ /^\d+[,.]{0,1}\d+$/
179 0 2 unless $valor >= 0
196 0 1 unless ($pesos =~ /^\d+$/)
202 0 1 unless $rate >= 0
219 0 1 unless ($dolares =~ /^\d+(\.\d{0,2}){0,1}$/)
229 0 1 unless $valor >= 0