| line |
true |
false |
branch |
|
190
|
0 |
0 |
if ($@) |
|
198
|
4 |
4 |
$@ ? : |
|
212
|
0 |
0 |
unless $line =~ s/^
(?:
# double quoted string
(") # $quote
((?>[^\\"]*(?:\\.[^\\"]*)*))" # $quoted
| # --OR--
# singe quoted string
(') # $quote
((?>[^\\']*(?:\\.[^\\']*)*))' # $quoted
| # --OR--
# unquoted string
( # $unquoted
(?:\\.|[^\\"'])*?
)
# followed by
( # $delim
\Z(?!\n) # EOL
| # --OR--
(?-x:$delimiter) # delimiter
| # --OR--
(?!^)(?=["']) # a quote
)
)//sx |
|
235
|
0 |
0 |
$1 ? : |
|
237
|
0 |
0 |
unless defined $quote or length $unquoted or length $delim |
|
239
|
0 |
0 |
if ($keep) { } |
|
244
|
0 |
0 |
if (defined $quote) |
|
245
|
0 |
0 |
if $quote eq "\"" |
|
249
|
0 |
0 |
defined $quote ? : |
|
251
|
0 |
0 |
if (length $delim) |
|
253
|
0 |
0 |
if $keep eq "delimiters" |
|
256
|
0 |
0 |
unless (length $line) |
|
264
|
126 |
0 |
if $^O ne "MSWin32" |
|
272
|
0 |
48 |
if ($Config_cc eq 'cl') { } |
|
|
0 |
48 |
elsif ($Config_cc =~ /bcc32(\.exe)?/) { } |
|
274
|
0 |
0 |
defined $lib ? : |
|
|
0 |
0 |
defined $lib ? : |
|
285
|
0 |
0 |
defined $lib ? : |
|
298
|
0 |
35 |
$^O eq 'darwin' ? : |
|
|
13 |
35 |
!defined($lib) ? : |
|
313
|
0 |
43 |
if ($debug) |
|
330
|
6 |
25 |
unless $args{'lib'} |
|
331
|
20 |
11 |
unless $args{'libpath'} |
|
332
|
17 |
14 |
unless $args{'header'} |
|
333
|
19 |
12 |
unless $args{'incpath'} |
|
344
|
0 |
0 |
if (my($mm_attr_value) = $arg =~ /\A $mm_attr_key = (.*)/x) |
|
353
|
1 |
30 |
if (defined $args{'LIBS'}) |
|
355
|
0 |
3 |
unless $arg =~ /^-[lLR]/ |
|
356
|
2 |
1 |
$arg =~ /^-l/ ? : |
|
359
|
2 |
29 |
if (defined $args{'INC'}) |
|
361
|
1 |
2 |
unless $arg =~ /^-I/ |
|
378
|
0 |
13 |
if $args{'debug'} |
|
379
|
0 |
13 |
$args{'debug'} ? : |
|
380
|
1 |
12 |
if $rv != 0 or not -f $exefile |
|
388
|
0 |
35 |
if $Devel::CheckLib::Config{'cc'} eq "CC/DECC" |
|
391
|
0 |
35 |
if $args{'debug'} |
|
392
|
35 |
0 |
unless $^O eq "MSWin32" or $^O eq "darwin" |
|
393
|
0 |
35 |
if $^O eq "MSWin32" |
|
394
|
0 |
35 |
$args{'debug'} ? : |
|
395
|
11 |
24 |
if ($rv != 0 or not -f $exefile) { } |
|
401
|
0 |
24 |
if $absexefile =~ /\s/ |
|
402
|
0 |
24 |
if $args{'debug'} |
|
403
|
24 |
0 |
if ($execute) |
|
405
|
0 |
24 |
if $args{'debug'} |
|
406
|
2 |
22 |
if $retval != 0 |
|
408
|
1 |
23 |
if $analyze_binary and not &$analyze_binary($lib, $exefile) |
|
416
|
10 |
20 |
if @missing |
|
418
|
2 |
18 |
if @wrongresult |
|
420
|
1 |
17 |
if @wronganalysis |
|
430
|
0 |
48 |
if ($Devel::CheckLib::Config{'cc'} eq "cl") |
|
439
|
0 |
36 |
unless unlink $_ |
|
454
|
41 |
0 |
if $config_val =~ /\S/ |
|
457
|
82 |
0 |
if length $_ |
|
460
|
1 |
40 |
if (check_compiler($cc[0], $debug)) |
|
465
|
0 |
40 |
if ($^O eq "cygwin") |
|
471
|
39 |
204 |
if (check_compiler($compiler, $debug)) |
|
474
|
204 |
0 |
unless $exe |
|
477
|
0 |
0 |
if (check_compiler($compiler, $debug)) |
|
487
|
40 |
244 |
if (-f $compiler and -x $compiler) |
|
488
|
0 |
40 |
if $debug |
|
491
|
0 |
244 |
if $debug |
|
503
|
0 |
66 |
unless open STDOUT_SAVE, ">&STDOUT" |
|
504
|
0 |
66 |
unless open STDERR_SAVE, ">&STDERR" |
|
508
|
0 |
66 |
unless open DEV_NULL, ">" . "File::Spec"->devnull |
|
510
|
0 |
66 |
unless open STDOUT, ">&" . fileno(DEV_NULL) |
|
512
|
0 |
66 |
unless open STDERR, ">&" . fileno(DEV_NULL) |
|
519
|
0 |
66 |
unless open STDOUT, ">&" . fileno(STDOUT_SAVE) |
|
521
|
0 |
66 |
unless open STDERR, ">&" . fileno(STDERR_SAVE) |