| line |
true |
false |
branch |
|
25
|
0 |
1 |
unless get_args_as_hash(\@_, \my(%args), {'timeout', 30}) |
|
45
|
0 |
6 |
unless get_args_as_hash(\@_, \my(%args), {'type', 'elite', 'max_pages', 1}) |
|
63
|
0 |
6 |
unless exists $page_for{$args{'type'}} |
|
73
|
0 |
6 |
unless $mech->get($uri)->is_success |
|
76
|
0 |
6 |
if $page_type eq 'anonymous' |
|
78
|
0 |
6 |
if $page_type eq 'non-anonymous' |
|
87
|
6 |
0 |
if $args{'max_pages'} |
|
90
|
0 |
6 |
if $self->debug |
|
95
|
0 |
6 |
unless ($mech->get($_)->is_success) |
|
96
|
0 |
0 |
if $self->debug |
|
101
|
0 |
6 |
unless my $list_ref = $self->_parse_list($mech->res->content) |
|
115
|
0 |
0 |
unless get_args_as_hash(\@_, \my(%args)) |
|
122
|
0 |
0 |
if grep {not exists $valid_filters{$_};} keys %args |
|
128
|
0 |
0 |
unless my $list_ref = $self->list |
|
137
|
0 |
0 |
if (ref $args{$_} eq 'Regexp') { } |
|
138
|
0 |
0 |
if $$proxy_ref{$_} =~ /$args{$_}/ |
|
142
|
0 |
0 |
if $$proxy_ref{$_} eq $args{$_} |
|
147
|
0 |
0 |
if $is_good == keys %args |
|
171
|
4632 |
87996 |
if ($t->is_start_tag('tr')) { } |
|
|
27726 |
60270 |
elsif ($nav{'get_data'} == 1 and $t->is_start_tag('td')) { } |
|
|
27750 |
32520 |
elsif ($nav{'data_cell'} and $t->is_text) { } |
|
|
4632 |
27888 |
elsif ($t->is_end_tag('tr')) { } |
|
184
|
6 |
4626 |
unless keys %current |
|
201
|
0 |
0 |
if (defined $type and $type eq 'net') { } |