line |
!l |
l&&!r |
l&&r |
condition |
309
|
0 |
0 |
0 |
eval ' use Fcntl qw(O_WRONLY O_APPEND O_CREAT); 1 ' and sysopen $fh, "$filename.e", &O_WRONLY | &O_APPEND | &O_CREAT |
620
|
0 |
0 |
0 |
$Char::Latin8::slash eq 'm//' and m[\G (/) ]cgox |
|
0 |
0 |
0 |
$Char::Latin8::slash eq 'm//' and /\G (\?) /cgox |
1570
|
0 |
0 |
0 |
$2 == 5 and $3 ge '012' |
1578
|
0 |
0 |
0 |
$2 == 5 and $3 >= 12 |
1909
|
0 |
0 |
0 |
grep /\A \{ \z/msx, @char and grep /\A \} \z/msx, @char |
2606
|
0 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
0 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
2847
|
0 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
0 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
3054
|
0 |
0 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
3126
|
0 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
0 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
3165
|
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 &Char::Elatin8::uc($char[$i]) ne &Char::Elatin8::fc($char[$i]) |
|
0 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
3170
|
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 $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 $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 $q_char \z/mosx |
3422
|
0 |
0 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
3442
|
0 |
0 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
3449
|
0 |
0 |
0 |
$ope =~ /\A m? \z/mosx and $delimiter eq '?' |
3538
|
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 &Char::Elatin8::uc($char[$i]) ne &Char::Elatin8::fc($char[$i]) |
|
0 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
3792
|
0 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
0 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
3831
|
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 &Char::Elatin8::uc($char[$i]) ne &Char::Elatin8::fc($char[$i]) |
|
0 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
3836
|
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 $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 $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 $q_char \z/mosx |
4183
|
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 &Char::Elatin8::uc($char[$i]) ne &Char::Elatin8::fc($char[$i]) |
|
0 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
4571
|
0 |
0 |
0 |
$char[$i] eq '\\L' and $char[$i + 1] eq '\\u' |
|
0 |
0 |
0 |
$char[$i] eq '\\U' and $char[$i + 1] eq '\\l' |
4610
|
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 &Char::Elatin8::uc($char[$i]) ne &Char::Elatin8::fc($char[$i]) |
|
0 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |
4615
|
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 $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 $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 $q_char \z/mosx |
4928
|
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 &Char::Elatin8::uc($char[$i]) ne &Char::Elatin8::fc($char[$i]) |
|
0 |
0 |
0 |
$i >= 1 and $char[$i] =~ /\A [\?\+\*\{] \z/mosx |