| line |
true |
false |
branch |
|
40
|
0 |
0 |
if ($l =~ /\s--encoding\s+$|\s:e\s+$/) |
|
42
|
0 |
0 |
if ($l =~ /$M(\.|[a-zA-Z_][-a-zA-Z0-9_]*)$F\s+(:([[:alnum:]]?)|--([-_[:alnum:]]*))$/) |
|
45
|
0 |
0 |
if defined $c and not ref $c |
|
46
|
0 |
0 |
if (defined $c and defined $c->[3]) |
|
47
|
0 |
0 |
if ($o =~ /^:/) { } |
|
48
|
0 |
0 |
if length $_ == 1 |
|
50
|
0 |
0 |
if length $_ > 1 |
|
69
|
0 |
0 |
unless @result |
|
72
|
0 |
0 |
unless length $result[0] and length $result[0] >= $i |
|
76
|
0 |
0 |
if (@tries == @result) { } |
|
87
|
0 |
0 |
if ($type eq 'perl') { } |
|
96
|
0 |
0 |
if ($type eq 'perl') { } |
|
106
|
0 |
0 |
$^O eq 'MSWin32' ? : |
|
107
|
0 |
0 |
$^O eq 'MSWin32' ? : |
|
111
|
0 |
0 |
if (opendir DIR, $dir) |
|
112
|
0 |
0 |
if -f "$dir$pdelim$_" |
|
122
|
0 |
0 |
$^O eq 'MSWin32' ? : |
|
123
|
0 |
0 |
if (index($word, $pdelim) >= 0) |
|
126
|
0 |
0 |
unless (@PATH_HASH) |
|
135
|
0 |
0 |
if ($part =~ /$match_sv/) { } |
|
|
0 |
0 |
elsif ($part =~ /$match_option/) { } |
|
|
0 |
0 |
elsif ($part =~ /$match_func/) { } |
|
|
0 |
0 |
elsif ($part =~ /$match_nodetype/) { } |
|
|
0 |
0 |
elsif ($part =~ /$match_help/) { } |
|
|
0 |
0 |
elsif ($part =~ /$match_command/) { } |
|
|
0 |
0 |
elsif ($part =~ /$match_filename/) { } |
|
|
0 |
0 |
elsif ($part =~ /$match_dir/) { } |
|
|
0 |
0 |
elsif ($part =~ /$match_path_filename/) { } |
|
150
|
0 |
0 |
if (@result == 1 and -d $result[0]) { } |
|
158
|
0 |
0 |
if (@result == 1) { } |
|
165
|
0 |
0 |
$word =~ s/^(\!)// ? : |
|
167
|
0 |
0 |
if (@result == 1 and -d $result[0]) { } |
|
184
|
0 |
0 |
if $debug |
|
188
|
0 |
0 |
if ($str =~ /\G\s*[\]\)]/cogs) |
|
189
|
0 |
0 |
if $debug |
|
194
|
0 |
0 |
if ($str =~ /\G($NAMECHAR+)?(?::($NAMECHAR+))?/cogs) { } |
|
197
|
0 |
0 |
if ($prefix ne '') { } |
|
206
|
0 |
0 |
if ($name ne '') { } |
|
218
|
0 |
0 |
if ($str =~ /\G\@/cogs) |
|
223
|
0 |
0 |
if $debug |
|
224
|
0 |
0 |
if $debug |
|
225
|
0 |
0 |
if $debug |
|
227
|
0 |
0 |
if $debug |
|
228
|
0 |
0 |
if ($1 eq ')' or $1 eq ']') { } |
|
230
|
0 |
0 |
$1 eq ')' ? : |
|
232
|
0 |
0 |
if $debug |
|
234
|
0 |
0 |
if $str =~ /\G([^]["'()]+)/cogs |
|
235
|
0 |
0 |
unless $str =~ /\G(.)/cogs |
|
236
|
0 |
0 |
if ($1 eq $ballance[$#ballance]) { } |
|
|
0 |
0 |
elsif ($1 eq ')') { } |
|
|
0 |
0 |
elsif ($1 eq ']') { } |
|
|
0 |
0 |
elsif ($1 eq '"') { } |
|
|
0 |
0 |
elsif ($1 eq q[']) { } |
|
260
|
0 |
0 |
if $debug |
|
261
|
0 |
0 |
if $debug |
|
262
|
0 |
0 |
if (substr($result, 0, 1) eq '/') { } |
|
263
|
0 |
0 |
if ($str =~ /\G['"]/cogs) { } |
|
|
0 |
0 |
elsif ($str =~ /\G(?:\s+['"]|\(|\[|$OPER)/cogs) { } |
|
270
|
0 |
0 |
if $str =~ /\G\s+(?=$OPER)/cogs |
|
273
|
0 |
0 |
if $debug |
|
275
|
0 |
0 |
if $debug |
|
279
|
0 |
0 |
if $debug |
|
280
|
0 |
0 |
unless $str =~ /\G(.)/cogs |
|
281
|
0 |
0 |
if $debug |
|
282
|
0 |
0 |
if (@ballance and $1 eq $ballance[$#ballance]) { } |
|
|
0 |
0 |
elsif ($1 eq ')') { } |
|
|
0 |
0 |
elsif ($1 eq ']') { } |
|
|
0 |
0 |
elsif ($1 eq '"') { } |
|
|
0 |
0 |
elsif ($1 eq q[']) { } |
|
|
0 |
0 |
elsif (not @ballance and $1 eq '[') { } |
|
293
|
0 |
0 |
if $debug |
|
303
|
0 |
0 |
unless $XML::XSH2::Functions::XPATH_COMPLETION |
|
308
|
0 |
0 |
if $xp eq '' |
|
312
|
0 |
0 |
if $@ |
|
315
|
0 |
0 |
$local =~ /^($NAMECHAR+:)/ ? : |
|
327
|
0 |
0 |
if ($XML::XSH2::Functions::XPATH_AXIS_COMPLETION eq 'always' || $XML::XSH2::Functions::XPATH_AXIS_COMPLETION eq 'when-empty' && !@completions and $str =~ m<[ \n\t\r|([=<>+-/]([[:alpha:]][-:[:alnum:]]*)?$> and not $1 =~ /::/) |
|
337
|
0 |
0 |
if ($axis =~ /^\Q$axpart\E/) |
|
342
|
0 |
0 |
unless ($pre =~ m[/$]) |
|
352
|
0 |
0 |
/^(.*)\n(.*)$/s ? : |
|
356
|
0 |
0 |
if ($func =~ /^\Q$axpart\E/) |