| bin/wdrender | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 26 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 59 | 0 | 2 | unless &main(\@ARGV) |
| 85 | 0 | 2 | unless &GetOptions(\%opt, "help|?", "handler=s", "status=s", "header!", "warn!", "error=s", "headers_out|header_out=s\@", "headers_in|header_in=s\@", "outfile=s", "repeat|r|num|n=s", "loop", "get=s\@", "delay=i", "man", "version") |
| 103 | 0 | 2 | if $opt{'help'} |
| 104 | 0 | 2 | if $opt{'man'} |
| 105 | 0 | 2 | if ($opt{'version'}) |
| 115 | 0 | 2 | if (my $dest_fn = $opt{'outfile'}) |
| 126 | 0 | 2 | unless -f $srce_fn |
| 140 | 0 | 2 | if (my $query_opt_ar = delete $opt{'get'}) |
| 194 | 0 | 2 | unless eval { do { require $handler_pm } } |
| 200 | 2 | 0 | if $opt{'error'} eq "text" |
| 211 | 0 | 2 | unless defined $handler->handler($r) |
| 232 | 0 | 2 | if (my $delay = $opt{'delay'}) |
| 238 | 2 | 0 | unless $opt{'loop'} |