line |
!l |
l&&!r |
l&&r |
condition |
707
|
0 |
0 |
0 |
--$limit > 0 and $string =~ s/\A((?:$Esjis::q_char)+?)$pattern//m |
739
|
0 |
0 |
0 |
--$limit > 0 and length $string > 0 |
753
|
0 |
0 |
0 |
--$limit > 0 and length $string > 0 |
773
|
0 |
0 |
0 |
scalar @split >= 1 and $split[-1] eq '' |
856
|
0 |
0 |
0 |
defined $replacementlist[$i] and $replacementlist[$i] ne '' |
|
0 |
0 |
0 |
defined $replacementlist[-1] and $replacementlist[-1] ne '' |
881
|
0 |
0 |
0 |
@char and not exists $tr{$char[0]} |
898
|
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} |
980
|
0 |
0 |
0 |
$pos < length $str and $pos <= $position |
1000
|
0 |
0 |
0 |
@_ and wantarray |
1025
|
0 |
0 |
0 |
@_ and wantarray |
1051
|
0 |
0 |
0 |
@_ and wantarray |
1076
|
3628 |
0 |
0 |
@_ and wantarray |
1102
|
3931 |
0 |
0 |
@_ and wantarray |
1133
|
0 |
0 |
0 |
$last_s_matched and $_[0] =~ /\A (?>[1-9][0-9]*) \z/mosx |
1284
|
0 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
1529
|
0 |
0 |
0 |
0 < $i and $i < $#char |
1863
|
1074 |
0 |
608 |
$min le $first and $first le $max |
|
1074 |
588 |
20 |
$min le $first and $first le $max and $max le $last |
|
1662 |
0 |
0 |
$min eq $first and $max eq $last |
|
588 |
1034 |
40 |
$first le $min and $max le $last |
|
1034 |
0 |
588 |
$min le $first and $last le $max |
|
0 |
994 |
40 |
$first le $min and $min le $last |
|
994 |
0 |
40 |
$first le $min and $min le $last and $last le $max |
1940
|
1273 |
606 |
8 |
$ignorecase and $char[$i] =~ /\A ( \[\: \^? (?:lower|upper) :\] ) \z/mosx |
1941
|
20 |
5 |
497 |
0 < $i and $i < $#char |
2083
|
319 |
1335 |
497 |
defined $char[$i + 1] and $char[$i + 1] eq '...' |
2106
|
20 |
20 |
477 |
$length == length $char[$i - 1] and $length == length $char[$i + 1] |
|
0 |
20 |
0 |
length $char[$i - 1] < $length and $length < length $char[$i + 1] |
2605
|
0 |
0 |
0 |
@_ and not wantarray |
2654
|
0 |
0 |
0 |
@_ and not wantarray |
2687
|
0 |
0 |
0 |
@_ and not wantarray |
2722
|
0 |
0 |
0 |
@_ and not wantarray |
2755
|
0 |
0 |
0 |
@_ and not wantarray |
2788
|
0 |
0 |
0 |
@_ and not wantarray |
2821
|
0 |
0 |
0 |
@_ and not wantarray |
2856
|
0 |
0 |
0 |
@_ and not wantarray |
2889
|
774 |
0 |
0 |
@_ and not wantarray |
2934
|
0 |
0 |
0 |
@_ and not wantarray |
2967
|
0 |
0 |
0 |
@_ and not wantarray |
3000
|
0 |
0 |
0 |
@_ and not wantarray |
3033
|
0 |
0 |
0 |
@_ and not wantarray |
3058
|
0 |
0 |
0 |
@_ and not wantarray |
3091
|
0 |
0 |
0 |
@_ and not wantarray |
3124
|
0 |
0 |
0 |
@_ and not wantarray |
3157
|
0 |
0 |
0 |
@_ and not wantarray |
3190
|
0 |
0 |
0 |
@_ and not wantarray |
3223
|
0 |
0 |
0 |
@_ and not wantarray |
3256
|
0 |
0 |
0 |
@_ and not wantarray |
3289
|
0 |
0 |
0 |
@_ and not wantarray |
3315
|
0 |
0 |
0 |
@_ and not wantarray |
3400
|
0 |
0 |
0 |
@_ and not wantarray |
3467
|
0 |
0 |
0 |
@_ and not wantarray |
3501
|
0 |
0 |
0 |
@_ and not wantarray |
3535
|
0 |
0 |
0 |
@_ and not wantarray |
4440
|
0 |
0 |
0 |
$head ne '' and ($head =~ / \G ($Esjis::q_char) /gmosx)[-1] ne $pathsep |
4463
|
0 |
0 |
0 |
$head ne '' and ($head =~ / \G ($Esjis::q_char) /gmosx)[-1] ne $pathsep |
4502
|
0 |
0 |
0 |
$cond eq 'd' and not &d("$head$leaf") |
4514
|
0 |
0 |
0 |
&Esjis::index($leaf, '.') == -1 and length $leaf <= 8 |
|
0 |
0 |
0 |
&Esjis::index($leaf, '.') == -1 and length $leaf <= 8 and &Esjis::index($pattern, '\\.') != -1 |
4675
|
0 |
0 |
0 |
$cond eq 'd' and not &d("$unesc_head$leaf") |
4680
|
0 |
0 |
0 |
$unesc_head eq ':' and &f("$unesc_head$leaf") |
4864
|
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'} |
4904
|
0 |
0 |
0 |
$home and &d($home) |
4913
|
0 |
0 |
0 |
$home and &d($home) |
4925
|
0 |
0 |
0 |
exists $ENV{'HOME'} and defined $ENV{'HOME'} |
|
0 |
0 |
0 |
exists $ENV{'LOGDIR'} and $ENV{'LOGDIR'} |
4944
|
0 |
0 |
0 |
defined $home and not &d($home) |
5118
|
0 |
0 |
0 |
defined $ENV{'OS'} and $ENV{'OS'} eq 'Windows_NT' |
5162
|
0 |
0 |
0 |
$] =~ /^(?:5\.006|5\.008000)/mosx and $^O eq 'MSWin32' |
5344
|
0 |
0 |
0 |
defined $ENV{'OS'} and $ENV{'OS'} eq 'Windows_NT' |
5412
|
0 |
0 |
774 |
@_ >= 1 and $_[0] ne '' |
5814
|
0 |
0 |
0 |
defined $1 and substr($&, -length($1), length $1) eq $1 |
5916
|
0 |
0 |
0 |
@_ and not wantarray |
6286
|
54538 |
21620 |
1231 |
$Esjis::slash eq 'm//' and m[\G (/) ]cgox |
|
54538 |
21528 |
92 |
$Esjis::slash eq 'm//' and /\G (\?) /cgox |
7407
|
0 |
3 |
0 |
$2 == 5 and $3 ge '012' |
7415
|
0 |
0 |
0 |
$2 == 5 and $3 >= 12 |
7931
|
3023 |
0 |
91 |
grep /\A \{ \z/msx, @char and grep /\A \} \z/msx, @char |
8266
|
3701 |
17216 |
412 |
defined $char[$i + 1] and $char[$i + 1] eq '\\' |
|
20917 |
390 |
22 |
defined $char[$i + 1] and $char[$i + 1] eq '\\' and $char[$i] =~ /\A ([\x80-\xFF].*) (\\) \z/msx |
8273
|
289 |
3497 |
204 |
defined $char[-1] and $char[-1] =~ /\A ([\x80-\xFF].*) (\\) \z/msx |
8312
|
309959 |
6 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
309965 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
8564
|
3219 |
6 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
3225 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
8776
|
44 |
106 |
90 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
8847
|
5436 |
1 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
5436 |
1 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
8880
|
3825 |
100 |
300 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
3925 |
62 |
238 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Esjis::uc($char[$i]) ne &fc($char[$i]) |
|
682 |
2997 |
188 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
8890
|
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 $Esjis::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 $Esjis::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 $Esjis::q_char \z/mosx |
9142
|
10 |
177 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
9162
|
0 |
0 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
9169
|
64 |
1429 |
94 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
9261
|
37 |
16 |
24 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
53 |
8 |
16 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Esjis::uc($char[$i]) ne &fc($char[$i]) |
|
52 |
9 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
9516
|
398 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
398 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
9549
|
321 |
8 |
15 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
329 |
4 |
11 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Esjis::uc($char[$i]) ne &fc($char[$i]) |
|
109 |
155 |
23 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
9559
|
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 $Esjis::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 $Esjis::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 $Esjis::q_char \z/mosx |
9919
|
36 |
8 |
12 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
44 |
4 |
8 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Esjis::uc($char[$i]) ne &fc($char[$i]) |
|
38 |
10 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
10050
|
6 |
3 |
0 |
defined $char[$i + 1] and $char[$i + 1] eq '\\' |
|
9 |
0 |
0 |
defined $char[$i + 1] and $char[$i + 1] eq '\\' and $char[$i] =~ /\A ([\x80-\xFF].*) (\\) \z/msx |
10070
|
85 |
6 |
0 |
defined $char[-1] and $char[-1] =~ /\A ([\x80-\xFF].*) (\\) \z/msx |
10408
|
372 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
372 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
10441
|
349 |
3 |
11 |
$char[$i] eq '^' and not $modifier =~ /m/mosx |
|
310 |
24 |
18 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
334 |
0 |
18 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Esjis::uc($char[$i]) ne &fc($char[$i]) |
|
122 |
167 |
7 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
10451
|
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 $Esjis::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 $Esjis::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 $Esjis::q_char \z/mosx |
10767
|
56 |
0 |
0 |
$char[$i] eq '^' and not $modifier =~ /m/mosx |
|
28 |
16 |
12 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx |
|
44 |
0 |
12 |
$ignorecase and $char[$i] =~ /\A [\x00-\xFF] \z/mosx and &Esjis::uc($char[$i]) ne &fc($char[$i]) |
|
44 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |