| line |
!l |
l&&!r |
l&&r |
condition |
|
117
|
0 |
0 |
0 |
$self->_exists_overwrite and $self->_makefile_ok |
|
141
|
0 |
0 |
0 |
$self->{'show_summary'} and not $self->{'Config'}{'Verbose'} |
|
171
|
0 |
0 |
0 |
-e $rcfile and not -z $rcfile |
|
|
0 |
0 |
0 |
-e $rcfile and not -z $rcfile and File::Slurp::read_file($rcfile) =~ /\w+/ |
|
210
|
0 |
0 |
0 |
not $failed and $makefile =~ /WriteMakefile\(\s*%\w+.*\s*\)/s |
|
|
0 |
0 |
0 |
not $failed and $makefile =~ /WriteMakefile\(\s*%\w+.*\s*\)/s and not $self->{'Config'}{'Exec_Makefile'} |
|
218
|
0 |
0 |
0 |
$self->{'Config'}{'Verbose'} and @{$self->{'dirs'};} |
|
221
|
0 |
0 |
0 |
$self->{'Config'}{'Verbose'} and @{$self->{'dirs'};} |
|
265
|
0 |
0 |
0 |
-e $rcfile and not -z $rcfile |
|
|
0 |
0 |
0 |
-e $rcfile and not -z $rcfile and File::Slurp::read_file($rcfile) =~ /\w+/ |
|
432
|
0 |
0 |
0 |
$self->_is_quotelike($token) and not $have{'code'} |
|
|
0 |
0 |
0 |
$self->_is_quotelike($token) and not $have{'code'} and not $have{'nested_structure'} |
|
|
0 |
0 |
0 |
$self->_is_quotelike($token) and not $have{'code'} and not $have{'nested_structure'} and $token{'last'}->(1) ne "=>" |
|
|
0 |
0 |
0 |
$token eq "=>" and not $have{'nested_structure'} |
|
440
|
0 |
0 |
0 |
$structure_ended and $token eq "," |
|
443
|
0 |
0 |
0 |
$token->isa("PPI::Token::Structure") and not $have{'code'} |
|
457
|
0 |
0 |
0 |
$token{'next'}->() eq "," and not $have{'code'} |
|
|
0 |
0 |
0 |
$token{'next'}->() eq "," and not $have{'code'} and not $have{'nested_structure'} |
|
458
|
0 |
0 |
0 |
$token->isa("PPI::Token::Word") and $token{'next'}->(1) ne "=>" |
|
466
|
0 |
0 |
0 |
$token eq "," and $token{'next'}->(1) eq "]" |
|
478
|
0 |
0 |
0 |
$token =~ /^[\[\]\{\}]$/ and not $have{'code'} |
|
480
|
0 |
0 |
0 |
$token eq "," and not $have{'code'} |
|
|
0 |
0 |
0 |
$token eq "," and not $have{'code'} and not $seen{'code'} |
|
489
|
0 |
0 |
0 |
@items % 2 == 1 and $type ne "array" |
|
492
|
0 |
0 |
0 |
$structure_ended and $type eq "string" |
|
499
|
0 |
0 |
0 |
$structure_ended and @items |
|
504
|
0 |
0 |
0 |
$type eq "hash" and defined $items[-1] |
|
541
|
0 |
0 |
0 |
$token eq "," and not $have{'?'} |
|
551
|
0 |
0 |
0 |
$have{'?'} and $have{':'} |
|
569
|
0 |
0 |
0 |
$occurences{'('} == $occurences{')'} and $have{'parentheses'} |
|
|
0 |
0 |
0 |
$occurences{'('} == $occurences{')'} and $have{'parentheses'} and $have{'comma'} |
|
837
|
0 |
0 |
0 |
defined $comment and defined $self->{'Data'}{'table'}{$arg} |
|
1004
|
0 |
0 |
0 |
$value eq "SCALAR" and not $value =~ /\d+/ |
|
1240
|
0 |
0 |
0 |
$seen{'begin'} and $line =~ /^\s*}/ |
|
1326
|
0 |
0 |
0 |
$line =~ /['"](?!,)$/ and $#lines - $i != 1 |
|
1333
|
0 |
0 |
0 |
$i == $#lines && defined $self->{'make_comments'}{$arg} |
|
1477
|
0 |
0 |
0 |
$self->{'Config'}{'Verbose'} and $level == 1 |
|
|
0 |
0 |
0 |
$self->{'Config'}{'Verbose'} == 2 and $level == 2 |
|
1487
|
0 |
0 |
0 |
pop() and my $no_wait = 1 |
|
1489
|
0 |
0 |
0 |
warn "Press [enter] to continue...\n" and readline STDIN |
| line |
l |
!l |
condition |
|
43
|
0 |
0 |
$params{'Path'} || '' |
|
|
0 |
0 |
$params{'Makefile_PL'} || 'Makefile.PL' |
|
|
0 |
0 |
$params{'Build_PL'} || 'Build.PL' |
|
|
0 |
0 |
$params{'MANIFEST'} || 'MANIFEST' |
|
|
0 |
0 |
$params{'RC'} || '.make2buildrc' |
|
|
0 |
0 |
$params{'Dont_Overwrite_Auto'} || 1 |
|
|
0 |
0 |
$params{'Create_RC'} || 0 |
|
|
0 |
0 |
$params{'Parse_PPI'} || 0 |
|
|
0 |
0 |
$params{'Exec_Makefile'} || 0 |
|
|
0 |
0 |
$params{'Verbose'} || 0 |
|
|
0 |
0 |
$params{'Debug'} || 0 |
|
|
0 |
0 |
$params{'Process_Code'} || 0 |
|
|
0 |
0 |
$params{'Use_Native_Order'} || 0 |
|
|
0 |
0 |
$params{'Len_Indent'} || 3 |
|
|
0 |
0 |
$params{'DD_Indent'} || 2 |
|
|
0 |
0 |
$params{'DD_Sortkeys'} || 1 |
|
260
|
0 |
0 |
shift() || 'undef' |
|
554
|
0 |
0 |
$occurences{'('} ||= 0 |
|
555
|
0 |
0 |
$occurences{')'} ||= 0 |
|
672
|
0 |
0 |
$value ||= "" |
|
673
|
0 |
0 |
$comment ||= "" |
|
689
|
0 |
0 |
$values ||= "" |
|
690
|
0 |
0 |
$comment ||= "" |
|
704
|
0 |
0 |
$values ||= "" |
|
705
|
0 |
0 |
$comment ||= "" |
|
761
|
0 |
0 |
$comment ||= "" |
|
808
|
0 |
0 |
$self->{'parse'}{'makecode'} ||= "" |
|
1017
|
0 |
0 |
shift @queue || (return) |
|
1107
|
0 |
0 |
$self->{'Config'}{'DD_Indent'} || 2 |
|
1327
|
0 |
0 |
$comma ||= "" |
|
1417
|
0 |
0 |
$self->{'make_code'}{$section} ||= "" |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
26
|
0 |
0 |
0 |
ref $self || $self |
|
56
|
0 |
0 |
0 |
$self->{'Config'}{'reinit'} or @{[] unless $self->{'dirs'};} |
|
251
|
0 |
0 |
0 |
$current->{$key} ||= @path ? {} : $value |
|
466
|
0 |
0 |
0 |
$token eq "," and $token{'next'}->(1) eq "]" or $token{'next'}->(1) eq "]" |
|
470
|
0 |
0 |
0 |
$token{'next'}->(1) =~ /^[\}\]]$/ || !$have{'nested_structure'} |
|
484
|
0 |
0 |
0 |
$token =~ /^['"]\s+['"]$/ or $have{'code'} |
|
486
|
0 |
0 |
0 |
$have{'code'} || $structure_ended |
|
489
|
0 |
0 |
0 |
@items % 2 == 1 and $type ne "array" or not @items |
|
526
|
0 |
0 |
0 |
$token->isa('PPI::Token::Double') || $token->isa('PPI::Token::Quote::Interpolate') || $token->isa('PPI::Token::Quote::Literal') || $token->isa('PPI::Token::Quote::Single') || $token->isa('PPI::Token::Word') |
|
566
|
0 |
0 |
0 |
$occurences{'('} or $occurences{')'} |
|
1150
|
0 |
0 |
0 |
defined $self->{'make_code'}{'begin'} or defined $self->{'make_code'}{'end'} |
|
1225
|
0 |
0 |
0 |
$comments_header || $code_header |
|
1238
|
0 |
0 |
0 |
$line =~ /^sub $quoted_pattern\w+/s or $line =~ /^\{/ |
|
1242
|
0 |
0 |
0 |
$seen{'begin'} or $seen{'end'} |
|
1477
|
0 |
0 |
0 |
$self->{'Config'}{'Verbose'} and $level == 1 or $self->{'Config'}{'Verbose'} == 2 and $level == 2 |