| line |
l |
!l&&r |
!l&&!r |
condition |
|
72
|
0 |
0 |
0 |
$opts{'ua'} ||= 'WWW::Mechanize'->new('agent', 'Finance::Bank::CreditMut' . "/$Finance::Bank::CreditMut::VERSION ($^O)", 'cookie_jar', {}) |
|
85
|
0 |
0 |
0 |
$orig_r->content or $count > 13 |
|
138
|
0 |
0 |
0 |
$dept || $asset =~ /(.*?)([A-Z]+)$/ |
|
217
|
0 |
0 |
0 |
$self->{'statements'} ||= do {
$self->{'ua'}->get($self->{'url'});
$self->{'ua'}->follow_link('text_regex', qr/XP/);
chomp(my @content = split(/\015\012/, $self->{'ua'}->content, 0));
shift @content;
[map('Finance::Bank::CreditMut::Statement'->new($_), @content)]
} |