blib/lib/WWW/Mechanize/Shell.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 35 | 66 | 53.0 |
line | l | !l | condition |
---|---|---|---|
549 | 0 | 72 | $_[0]->agent->forms and scalar @{$_[0]->agent->forms;} |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
170 | 0 | 0 | 17249 | -f $_ and -r $_ |
250 | 32 | 0 | 0 | $ENV{'PAGER'} and -t STDOUT |
296 | 338 | 0 | 0 | $self->{'files'} and $self->{'files'}->changed |
741 | 0 | 37 | 43 | $token and not $token->is_text |
37 | 3 | 40 | $token and not $token->is_text and not $token->is_end_tag($wanted) | |
745 | 0 | 3 | 37 | $token and $token->is_text |
1148 | 7 | 56 | 7 | defined $t && $t =~ /$re/ |
1149 | 1 | 8 | 1 | defined $t && $t eq $link |
1275 | 1 | 0 | 1 | $option and exists $self->{'options'}{$option} |
1276 | 0 | 0 | 1 | $option and defined $value |
1864 | 0 | 0 | 0 | $value eq '' and $input->type eq 'checkbox' |
line | l | !l | condition |
---|---|---|---|
113 | 0 | 83 | $args{'agent_class'} || 'WWW::Mechanize' |
114 | 0 | 83 | $args{'agent_args'} || [] |
337 | 0 | 0 | $self->agent->uri || '' |
409 | 3 | 45 | $prefix ||= '' |
716 | 9 | 2 | $headers ||= '12345' |
736 | 40 | 0 | $indent ||= 1 |
911 | 0 | 0 | $form->attr('name') || ' |
1106 | 3 | 0 | $button ||= '' |
1274 | 1 | 1 | $option ||= '' |
1862 | 19 | 1 | $input->value || '' |
0 | 0 | $input->value || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
158 | 0 | 0 | 0 | $ENV{'USERPROFILE'} || $ENV{'HOME'} |
306 | 0 | 1 | 0 | $self->{'browser'} ||= 'HTML::Display'->new |
615 | 3 | 0 | 17 | defined $_->text && $_->text =~ /$re/ || defined $_->url && $_->url =~ /$re/ |