line |
true |
false |
branch |
28
|
0 |
197 |
if ($^X =~ / jperl /imosx) |
63
|
197 |
0 |
if (eval {
do {
local $@;
CORE::require strict
}
}) |
145
|
197 |
0 |
if (-e "$filename.e") |
146
|
0 |
197 |
if (exists $ENV{'SJIS_DEBUG'}) { } |
|
0 |
197 |
elsif (-z "$filename.e") { } |
186
|
0 |
197 |
if ($mtime_escape < $mtime_source or $mtime_escape < $mtime_filter) |
192
|
0 |
197 |
unless (-e "$filename.e") |
195
|
0 |
0 |
if (eval ' use Fcntl qw(O_WRONLY O_APPEND O_CREAT); 1 ' and sysopen $fh, "$filename.e", &O_WRONLY | &O_APPEND | &O_CREAT) { } |
198
|
0 |
0 |
unless Char::Ewindows1252::_open_a($fh, "$filename.e") |
201
|
0 |
0 |
if (do {
exists $ENV{'SJIS_NONBLOCK'}
}) { } |
235
|
0 |
0 |
unless seek $fh, 0, 0 |
243
|
0 |
0 |
unless close $fh |
247
|
0 |
197 |
unless Char::Ewindows1252::_open_r($fh, "$filename.e") |
249
|
0 |
197 |
if (do {
exists $ENV{'SJIS_NONBLOCK'}
}) { } |
264
|
0 |
197 |
if ($^W) |
301
|
0 |
197 |
if ($^O =~ /\A (?: MSWin32 | NetWare | symbian | dos ) \z/mosx) { } |
330
|
0 |
0 |
if ($word =~ / [ ] /mosx) { } |
359
|
0 |
0 |
unless Char::Ewindows1252::_open_r($fh, $script) |
362
|
0 |
0 |
unless close $fh |
364
|
0 |
0 |
if (/^ use Char::Ewindows1252(?:\s+[0-9\.]*)?\s*; $/mosx) { } |
370
|
0 |
0 |
if (s/\A(#!.+?\n)//mos) |
377
|
0 |
0 |
if (s/\A(\@rem\s*=\s*'.*?'\s*;\s*\n)//mos) |
391
|
0 |
0 |
if (s/(.*^#\s*line\s+\d+(?:\s+"(?:$q_char)+?")?\s*\n)//mos) |
410
|
0 |
0 |
if (s/^ \s* use \s+ Char::Windows1252 \s* ([^;]*) ; \s* \n? $//mosx) |
414
|
0 |
0 |
if ($list =~ s/\A ([0-9]+\.[0-9]+) \.0 \s* //mosx) { } |
|
0 |
0 |
elsif ($list =~ s/\A ([0-9]+(?:\.[0-9]*)) \s* //mosx) { } |
416
|
0 |
0 |
if ($version ne $Char::Windows1252::VERSION) |
419
|
0 |
0 |
if (scalar keys %file >= 2) |
438
|
0 |
0 |
if ($version > $Char::Windows1252::VERSION) |
444
|
0 |
0 |
unless ($list =~ /\A \s* \z/mosx) |
448
|
0 |
0 |
if /\A ord \z/mosx |
449
|
0 |
0 |
if /\A ord \z/mosx |
450
|
0 |
0 |
if /\A reverse \z/mosx |
451
|
0 |
0 |
if /\A getc \z/mosx |