line |
true |
false |
branch |
40
|
0 |
2 |
unless ($self->user_id and $self->password or $self->customer_access_number and $self->pin and $self->code_word) |
43
|
2 |
2 |
$self->user_id && $self->password ? : |
61
|
0 |
82 |
unless grep /$attr/, @attrs |
64
|
64 |
18 |
unless @_ |
90
|
1 |
4 |
if (exists $self->accounts->{$account_number}) |
93
|
0 |
4 |
unless $account_number =~ /^\d+$/ |
100
|
1 |
3 |
if ($account_number =~ /\d{16}/) { } |
101
|
0 |
1 |
unless $account = "Finance::Bank::Wachovia::Credit"->new("number", $account_number, "data_obtainer", $do) |
109
|
0 |
3 |
unless $account = "Finance::Bank::Wachovia::Account"->new("number", $account_number, "data_obtainer", $do) |