Branch Coverage

blib/lib/Finance/Bank/Wachovia.pm
Criterion Covered Total %
branch 14 20 70.0


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 0 5 unless $account_number
92 1 4 if (exists $self->accounts->{$account_number})
95 0 4 unless $account_number =~ /^\d+$/
102 1 3 if ($account_number =~ /\d{16}/) { }
103 0 1 unless $account = 'Finance::Bank::Wachovia::Credit'->new('number', $account_number, 'data_obtainer', $do)
111 0 3 unless $account = 'Finance::Bank::Wachovia::Account'->new('number', $account_number, 'data_obtainer', $do)