| line |
true |
false |
branch |
|
130
|
0 |
0 |
unless (defined $$config_ref{$reqfield}) |
|
131
|
0 |
0 |
if ($croak) { } |
|
141
|
0 |
0 |
if (not defined $agent) { } |
|
158
|
0 |
0 |
if (time - $lastop < 60) |
|
159
|
0 |
0 |
if $$config_ref{'debug'} |
|
165
|
0 |
0 |
if ($res->is_success) |
|
167
|
0 |
0 |
if ($agent->content =~ /ACCOUNT SUMMARY/is) |
|
169
|
0 |
0 |
if $$config_ref{'debug'} |
|
174
|
0 |
0 |
if $$config_ref{'debug'} |
|
180
|
0 |
0 |
if $$config_ref{'debug'} |
|
183
|
0 |
0 |
unless ($res->is_success) |
|
190
|
0 |
0 |
if ($content =~ /Interruption Page/is) |
|
197
|
0 |
0 |
if ($content =~ /Page Not Found/is) |
|
214
|
0 |
0 |
unless ($res->is_success) |
|
218
|
0 |
0 |
if $$config_ref{'debug'} |
|
223
|
0 |
0 |
if (not $content =~ /LOGIN STEP 2 OF 2/is) { } |
|
228
|
0 |
0 |
unless ($content =~ /txtDigit/is) |
|
233
|
0 |
0 |
if $$config_ref{'debug'} |
|
236
|
0 |
0 |
if $$config_ref{'debug'} |
|
238
|
0 |
0 |
if $$config_ref{'debug'} |
|
286
|
0 |
0 |
if (defined $$tok[1]{'id'}) |
|
287
|
0 |
0 |
if ($$tok[1]{'id'} =~ /lblDigit[123]/) |
|
359
|
0 |
0 |
unless $self->login($config_ref) |
|
366
|
0 |
0 |
if (defined $$tok[1]{'style'}) |
|
367
|
0 |
0 |
if ($$tok[1]{'style'} eq 'width:25%;') |
|
369
|
0 |
0 |
if ($i == 0) |
|
373
|
0 |
0 |
if ($i == 1) |
|
376
|
0 |
0 |
if ($i == 2) |
|
379
|
0 |
0 |
if ($i == 3) |
|
383
|
0 |
0 |
if ($i == 4) |
|
442
|
0 |
0 |
if (defined $acc_type) { } |
|
443
|
0 |
0 |
if ($acc_type ne 'Switch Current A/C' and $acc_type ne 'Visa Card') |
|
452
|
0 |
0 |
unless (defined $acc_no) |
|
459
|
0 |
0 |
if (defined $from and defined $to) { } |
|
464
|
0 |
0 |
if (Delta_Days($d_from[0], $d_from[1], $d_from[2], $d_to[0], $d_to[1], $d_to[2]) <= 0) |
|
475
|
0 |
0 |
unless ($date =~ m[^\d{4}/\d{2}/\d{2}$]) |
|
481
|
0 |
0 |
unless (check_date($d[0], $d[1], $d[2])) |
|
491
|
0 |
0 |
if (defined $account) |
|
492
|
0 |
0 |
unless ($account =~ /.+ - \d{4}$/) |
|
500
|
0 |
0 |
unless (defined $acc) |
|
503
|
0 |
0 |
if ($account eq $$c{'accname'} . ' - ' . $$c{'accno'}) |
|
509
|
0 |
0 |
if ($found) { } |
|
511
|
0 |
0 |
unless $self->login($config_ref) |
|
515
|
0 |
0 |
if $$config_ref{'debug'} |
|
522
|
0 |
0 |
unless ($res->is_success) |
|
526
|
0 |
0 |
if $$config_ref{'debug'} |
|
541
|
0 |
0 |
if (defined $type) |
|
542
|
0 |
0 |
if $type == 1 |
|
544
|
0 |
0 |
if $type == 2 |
|
551
|
0 |
0 |
unless ($res->is_success) |
|
555
|
0 |
0 |
if $$config_ref{'debug'} |
|
563
|
0 |
0 |
if ($content =~ /YOU HAVE REQUESTED DATA OLDER THAN 6 MONTHS/is) |
|
569
|
0 |
0 |
unless ($res->is_success) |
|
573
|
0 |
0 |
if $$config_ref{'debug'} |
|
577
|
0 |
0 |
if ($content =~ /INCORRECT DATE CRITERIA ENTERED: 'TO DATE' WAS IN THE FUTURE./is) |
|
595
|
0 |
0 |
if (defined $$tok[1]{'id'}) |
|
596
|
0 |
0 |
if ($$tok[1]{'id'} eq 'tblTransactions') |
|
604
|
0 |
0 |
if ($text =~ m[^(\d{2}/\d{2}/\d{4}) (.+) ([-\+] [\d\.]+) ([\d\.]+ [-\+])$]) |
|
612
|
0 |
0 |
if ($$hash_ref{'balance'} =~ /^([\d\.]+) ([-\+])$/) |
|
613
|
0 |
0 |
if ($2 eq '+') |
|
616
|
0 |
0 |
if ($2 eq '-') |
|
620
|
0 |
0 |
if $i == 1 and $page == 1 or $i > 1 and $page >= 1 |
|
624
|
0 |
0 |
if ($text =~ m[^(\d{2}/\d{2}/\d{4}) (\d{2}/\d{2}/\d{4}) (.+) ([-\+] [\d\.]+)$]) |
|
641
|
0 |
0 |
if ($agent->content =~ /Another Statement/is) { } |
|
647
|
0 |
0 |
if ($visa) { } |
|
656
|
0 |
0 |
if $$config_ref{'debug'} |
|
659
|
0 |
0 |
unless ($res->is_success) |
|
692
|
0 |
1 |
if (defined $agent and not $error) |
|
695
|
0 |
0 |
if $$config_ref{'debug'} |