line |
true |
false |
branch |
66
|
0 |
0 |
if (ref $args ne 'HASH') |
71
|
0 |
0 |
unless $$args{$_} |
73
|
0 |
0 |
unless (UNIVERSAL::isa($$args{$_}, 'XML::SAX::Base')) |
78
|
0 |
0 |
unless (UNIVERSAL::can($$args{$_}, 'parse_uri')) |
93
|
0 |
0 |
if (ref $args ne 'HASH') |
98
|
0 |
0 |
unless $$args{$_} |
100
|
0 |
0 |
if (ref $$args{$_} ne 'CODE') |
118
|
0 |
0 |
if ($$data{'Name'} eq 'head') |
122
|
0 |
0 |
if ($$self{'__head'} and $$data{'Name'} eq 'orderby') |
126
|
0 |
0 |
if (not $$self{'__start'} and $$data{'Name'} eq 'directory') |
131
|
0 |
0 |
unless $$self{'__start'} |
133
|
0 |
0 |
if ($$data{'Name'} =~ /^(file|directory)$/ and not $$self{'__skip'}) |
143
|
0 |
0 |
if ($$self{'__skip'}) |
156
|
0 |
0 |
if ($$data{'Name'} eq 'head') |
167
|
0 |
0 |
if ($$self{'__skip'} == $$self{'__rlevel'}) |
179
|
0 |
0 |
if ($$self{'__head'}) |
190
|
0 |
0 |
if ($$data{'Name'} eq 'directory') |
201
|
0 |
0 |
if ($$data{'Name'} eq 'directory') |
214
|
0 |
0 |
if ($$data{'Name'} eq 'file') |
227
|
0 |
0 |
if ($$self{'__callbacks'}{'link'}) |