line |
!l |
l&&!r |
l&&r |
condition |
81
|
0 |
0 |
0 |
not ref $name and &Etis620::index($name, '::') == -1 |
|
0 |
0 |
0 |
not ref $name and &Etis620::index($name, '::') == -1 and &Etis620::index($name, q[']) == -1 |
491
|
0 |
0 |
0 |
--$limit > 0 and $string =~ s/\A((?:$Etis620::q_char)+?)$pattern//m |
520
|
0 |
0 |
0 |
--$limit > 0 and length $string > 0 |
533
|
0 |
0 |
0 |
--$limit > 0 and length $string > 0 |
552
|
0 |
0 |
0 |
scalar @split >= 1 and $split[-1] eq '' |
635
|
0 |
0 |
0 |
defined $replacementlist[$i] and $replacementlist[$i] ne '' |
|
0 |
0 |
0 |
defined $replacementlist[-1] and $replacementlist[-1] ne '' |
660
|
0 |
0 |
0 |
@char and not exists $tr{$char[0]} |
677
|
0 |
0 |
0 |
@char and exists $tr{$char[0]} |
|
0 |
0 |
0 |
@char and exists $tr{$char[0]} and $tr{$char[0]} eq $tr{$char} |
759
|
0 |
0 |
0 |
$pos < length $str and $pos <= $position |
779
|
0 |
0 |
0 |
@_ and wantarray |
804
|
0 |
0 |
0 |
@_ and wantarray |
830
|
0 |
0 |
0 |
@_ and wantarray |
855
|
114 |
0 |
0 |
@_ and wantarray |
881
|
137 |
0 |
0 |
@_ and wantarray |
1266
|
0 |
0 |
0 |
0 < $i and $i < $#char |
1434
|
0 |
0 |
182 |
$min le $first and $first le $max |
|
0 |
182 |
0 |
$min le $first and $first le $max and $max le $last |
|
182 |
0 |
0 |
$min eq $first and $max eq $last |
|
182 |
0 |
0 |
$first le $min and $max le $last |
|
0 |
0 |
182 |
$min le $first and $last le $max |
|
0 |
0 |
0 |
$first le $min and $min le $last |
|
0 |
0 |
0 |
$first le $min and $min le $last and $last le $max |
1511
|
810 |
30 |
8 |
$ignorecase and $char[$i] =~ /\A ( \[\: \^? (?:lower|upper) :\] ) \z/mosx |
1512
|
19 |
5 |
182 |
0 < $i and $i < $#char |
1654
|
166 |
571 |
182 |
defined $char[$i + 1] and $char[$i + 1] eq '...' |
1677
|
0 |
0 |
182 |
$length == length $char[$i - 1] and $length == length $char[$i + 1] |
|
0 |
0 |
0 |
length $char[$i - 1] < $length and $length < length $char[$i + 1] |
2324
|
0 |
0 |
0 |
$head ne '' and ($head =~ / \G ($Etis620::q_char) /gmosx)[-1] ne $pathsep |
2347
|
0 |
0 |
0 |
$head ne '' and ($head =~ / \G ($Etis620::q_char) /gmosx)[-1] ne $pathsep |
2386
|
0 |
0 |
0 |
$cond eq 'd' and not -d "$head$leaf" |
2398
|
0 |
0 |
0 |
&Etis620::index($leaf, '.') == -1 and length $leaf <= 8 |
|
0 |
0 |
0 |
&Etis620::index($leaf, '.') == -1 and length $leaf <= 8 and &Etis620::index($pattern, '\\.') != -1 |
2468
|
0 |
0 |
0 |
exists $ENV{'HOME'} and $ENV{'HOME'} |
|
0 |
0 |
0 |
exists $ENV{'USERPROFILE'} and $ENV{'USERPROFILE'} |
|
0 |
0 |
0 |
exists $ENV{'HOMEDRIVE'} and exists $ENV{'HOMEPATH'} |
|
0 |
0 |
0 |
exists $ENV{'HOMEDRIVE'} and exists $ENV{'HOMEPATH'} and $ENV{'HOMEDRIVE'} |
|
0 |
0 |
0 |
exists $ENV{'HOMEDRIVE'} and exists $ENV{'HOMEPATH'} and $ENV{'HOMEDRIVE'} and $ENV{'HOMEPATH'} |
2491
|
0 |
0 |
0 |
exists $ENV{'HOME'} and defined $ENV{'HOME'} |
|
0 |
0 |
0 |
exists $ENV{'LOGDIR'} and $ENV{'LOGDIR'} |
2510
|
0 |
0 |
0 |
defined $home and not -d $home |
2601
|
0 |
0 |
0 |
@_ and not wantarray |
2952
|
20603 |
7603 |
424 |
$Etis620::slash eq 'm//' and m[\G (/) ]cgox |
|
20603 |
7603 |
0 |
$Etis620::slash eq 'm//' and /\G (\?) /cgox |
3907
|
0 |
2 |
0 |
$2 == 5 and $3 ge '012' |
3915
|
0 |
0 |
0 |
$2 == 5 and $3 >= 12 |
4250
|
1683 |
0 |
16 |
grep /\A \{ \z/msx, @char and grep /\A \} \z/msx, @char |
4959
|
112530 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
112530 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
5204
|
5154 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
5154 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
5411
|
0 |
2 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
5482
|
1814 |
1 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
1814 |
1 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
5515
|
1241 |
11 |
28 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
1252 |
8 |
20 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Etis620::uc($char[$i]) ne &fc($char[$i]) |
|
295 |
781 |
138 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
5520
|
6 |
0 |
0 |
$i + 3 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 3]) == 3 |
|
6 |
0 |
0 |
$i + 3 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 3]) == 3 and eval(sprintf '"%s%s%s%s"', @char[$i .. $i + 3]) =~ /\A $Etis620::q_char \z/mosx |
|
6 |
0 |
0 |
$i + 2 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 2]) == 2 |
|
6 |
0 |
0 |
$i + 2 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 2]) == 2 and eval(sprintf '"%s%s%s"', @char[$i .. $i + 2]) =~ /\A $Etis620::q_char \z/mosx |
|
4 |
2 |
0 |
$i + 1 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, $char[$i + 1]) == 1 |
|
6 |
0 |
0 |
$i + 1 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, $char[$i + 1]) == 1 and eval(sprintf '"%s%s"', @char[$i .. $i + 1]) =~ /\A $Etis620::q_char \z/mosx |
5772
|
0 |
127 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
5792
|
0 |
0 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
5799
|
0 |
613 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
5891
|
2 |
0 |
0 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
2 |
0 |
0 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Etis620::uc($char[$i]) ne &fc($char[$i]) |
|
2 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
6140
|
195 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
195 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
6173
|
172 |
0 |
3 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
172 |
0 |
3 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Etis620::uc($char[$i]) ne &fc($char[$i]) |
|
60 |
84 |
13 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
6178
|
0 |
0 |
0 |
$i + 3 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 3]) == 3 |
|
0 |
0 |
0 |
$i + 3 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 3]) == 3 and eval(sprintf '"%s%s%s%s"', @char[$i .. $i + 3]) =~ /\A $Etis620::q_char \z/mosx |
|
0 |
0 |
0 |
$i + 2 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 2]) == 2 |
|
0 |
0 |
0 |
$i + 2 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 2]) == 2 and eval(sprintf '"%s%s%s"', @char[$i .. $i + 2]) =~ /\A $Etis620::q_char \z/mosx |
|
0 |
0 |
0 |
$i + 1 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, $char[$i + 1]) == 1 |
|
0 |
0 |
0 |
$i + 1 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, $char[$i + 1]) == 1 and eval(sprintf '"%s%s"', @char[$i .. $i + 1]) =~ /\A $Etis620::q_char \z/mosx |
6528
|
19 |
0 |
0 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
19 |
0 |
0 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Etis620::uc($char[$i]) ne &fc($char[$i]) |
|
13 |
6 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
6911
|
249 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
249 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
6944
|
236 |
2 |
7 |
$char[$i] eq '^' and not $modifier =~ /m/mosx |
|
238 |
0 |
0 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
238 |
0 |
0 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Etis620::uc($char[$i]) ne &fc($char[$i]) |
|
33 |
168 |
1 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
6949
|
0 |
0 |
0 |
$i + 3 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 3]) == 3 |
|
0 |
0 |
0 |
$i + 3 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 3]) == 3 and eval(sprintf '"%s%s%s%s"', @char[$i .. $i + 3]) =~ /\A $Etis620::q_char \z/mosx |
|
0 |
0 |
0 |
$i + 2 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 2]) == 2 |
|
0 |
0 |
0 |
$i + 2 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, @char[$i + 1 .. $i + 2]) == 2 and eval(sprintf '"%s%s%s"', @char[$i .. $i + 2]) =~ /\A $Etis620::q_char \z/mosx |
|
0 |
0 |
0 |
$i + 1 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, $char[$i + 1]) == 1 |
|
0 |
0 |
0 |
$i + 1 <= $#char and grep(/\A (?: \\ [0-7]{2,3} | \\x [0-9A-Fa-f]{1,2}) \z/mosx, $char[$i + 1]) == 1 and eval(sprintf '"%s%s"', @char[$i .. $i + 1]) =~ /\A $Etis620::q_char \z/mosx |
7265
|
0 |
0 |
0 |
$char[$i] eq '^' and not $modifier =~ /m/mosx |
|
0 |
0 |
0 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
0 |
0 |
0 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Etis620::uc($char[$i]) ne &fc($char[$i]) |
|
0 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |