| line |
% |
coverage |
branch |
|
22
|
100 |
T |
F |
if ($$opt{'h'}) |
|
23
|
100 |
T |
F |
if ($$opt{'m'}) |
|
24
|
100 |
T |
F |
if ($$opt{'V'}) |
|
26
|
100 |
T |
F |
if ($$opt{'o'}) { } |
|
27
|
50 |
T |
F |
unless open my $out, '>', $$opt{'o'} |
|
37
|
100 |
T |
F |
if ($_->att('subdocs')) { } |
|
42
|
100 |
T |
F |
if ($$opt{'subdocs'}) { } |
|
47
|
100 |
T |
F |
$$opt{'i'} ? : |
|
51
|
50 |
T |
F |
if ($$opt{'v'}) |
|
61
|
50 |
T |
F |
if ($$opt{'v'} and $$opt{'file'}) |
|
62
|
50 |
T |
F |
if ($$opt{'file'}) { } |
|
67
|
50 |
T |
F |
if ($$opt{'v'} and $$opt{'file'}) |
|
68
|
50 |
T |
F |
unless open my $in, '<', $$opt{'file'} |
|
70
|
100 |
T |
F |
if /^\<\?xml\ version/ or m[^\s*</?xml_split:root] |
|
71
|
100 |
T |
F |
if ($$opt{'o'}) { } |