| line |
!l |
l&&!r |
l&&r |
condition |
|
141
|
0 |
0 |
0 |
$opts{-'noprofile'} and $opts{-'profile'}
|
|
145
|
0 |
0 |
0 |
$opts{-'verbose'} and not $opts{-'verbose'} =~ /(?: \d+ | %[mfFlcCedrpPs] )/msx
|
|
150
|
0 |
0 |
0 |
exists $opts{-'top'} and $opts{-'top'} < 0
|
|
155
|
0 |
0 |
0 |
exists $opts{-'necessity'} and $opts{-'necessity'} < $Perl::ToPerl6::Command::NECESSITY_LOWEST || $opts{-'necessity'} > $Perl::ToPerl6::Command::NECESSITY_HIGHEST
|
|
182
|
0 |
0 |
0 |
@args == 1 and $args[0] eq '-'
|
|
282
|
0 |
0 |
0 |
not ref $file and $$opts_ref{$number_of_transformations ? '-files-with-transformations' : '-files-without-transformations'}
|
|
305
|
0 |
0 |
0 |
$verbosity eq $Perl::ToPerl6::Command::DEFAULT_VERBOSITY && @files > 1
|
|
344
|
0 |
0 |
0 |
not $opts_ref->{'-statistics-only'} and $statistics->total_transformations || !$$opts_ref{-'quiet'} && $statistics->modules
|
| line |
l |
!l&&r |
!l&&!r |
condition |
|
81
|
0 |
0 |
0 |
$opts{-'necessity'} ||= &first(sub {
exists $opts{"-$_"};
}
, @Perl::ToPerl6::Command::NECESSITY_NAMES)
|
|
82
|
0 |
0 |
0 |
$opts{-'necessity'} ||= &first(sub {
exists $opts{"-$_"};
}
, $Perl::ToPerl6::Command::NECESSITY_LOWEST .. $Perl::ToPerl6::Command::NECESSITY_HIGHEST)
|
|
91
|
0 |
0 |
0 |
$opts{-'top'} ||= $DEFAULT_VIOLATIONS_FOR_TOP
|
|
155
|
0 |
0 |
0 |
$opts{-'necessity'} < $Perl::ToPerl6::Command::NECESSITY_LOWEST || $opts{-'necessity'} > $Perl::ToPerl6::Command::NECESSITY_HIGHEST
|
|
182
|
0 |
0 |
0 |
not @args or @args == 1 and $args[0] eq '-'
|
|
264
|
0 |
0 |
0 |
$$opts_ref{-'statistics'} or $opts_ref->{'-statistics-only'}
|
|
279
|
0 |
0 |
0 |
$opts_ref->{'-files-with-transformations'} or $opts_ref->{'-files-without-transformations'}
|
|
296
|
0 |
0 |
0 |
@transformations or $$opts_ref{-'quiet'}
|
|
344
|
0 |
0 |
0 |
$statistics->total_transformations || !$$opts_ref{-'quiet'} && $statistics->modules
|