blib/lib/App/Wallflower.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 5 | 28 | 17.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
107 | 0 | 0 | 0 | print "wallflower version $Wallflower::VERSION\n" and exit() |
395 | 0 | 0 | 0 | $self->{'option'}{'parallel'} and $self->{'_parent_'} != $$ |
419 | 0 | 0 | 1 | $status eq '200' and $follow |
line | l | !l | condition |
---|---|---|---|
65 | 0 | 1 | $args ||= [] |
128 | 0 | 1 | $args{'args'} || [] |
160 | 1 | 0 | $Config::Config{'path_sep'} || ';' |
231 | 0 | 0 | (stat $TODO)[9] || 0 |
294 | 0 | 0 | (stat $_)[9] || 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
217 | 1 | 0 | 0 | !(ref $_ && $_->scheme) || eval { do { $_->host =~ /$host_ok/ } } |
319 | 0 | 0 | 0 | $self->{'_seen_fh_'} ||= do { die "Can't open $SEEN in read-write mode: $!" unless open my $fh, -e $SEEN ? '+<' : '+>', $SEEN; $fh->autoflush(1); $fh } |
338 | 0 | 0 | 0 | defined $next or $certain |