| blib/lib/Finance/Bank/ABSA.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 18 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 11 | 0 | 0 | unless exists $opts{'seccode'} |
| 12 | 0 | 0 | unless exists $opts{'bankingid'} |
| 13 | 0 | 0 | unless exists $opts{'mypassword'} |
| 25 | 0 | 0 | unless $agent->success |
| 34 | 0 | 0 | unless my $testpwdDgt = 'HTML::TokeParser'->new(\$agent->content) |
| 42 | 0 | 0 | if ($$pwdToken[1]{'class'} eq 'jc-pwdDgt') |
| 49 | 0 | 0 | unless $agent->success |
| 56 | 0 | 0 | unless my $stream = 'HTML::TokeParser'->new(\$content) |
| 64 | 0 | 0 | if ($$token[1]{'width'} eq '5') |