| line |
true |
false |
branch |
|
101
|
0 |
0 |
@_ >= 2 ? :
|
|
102
|
0 |
0 |
ref $self eq 'HASH' ? :
|
|
103
|
0 |
0 |
unless defined $source_code
|
|
106
|
0 |
0 |
&blessed($source_code) && $source_code->isa('Perl::ToPerl6::Document') ? :
|
|
114
|
0 |
0 |
if (0 == $self->transformers)
|
|
124
|
0 |
0 |
if ($_[-2] and $_[-2] eq 'doc')
|
|
127
|
0 |
0 |
unless (ref $source_code)
|
|
128
|
0 |
0 |
if ($config->in_place) { }
|
|
129
|
0 |
0 |
unless open my $fh, '>', $source_code
|
|
135
|
0 |
0 |
unless open my $fh, '>', $source_code . '.pl6'
|
|
151
|
0 |
0 |
unless ($self->config->force)
|
|
164
|
0 |
0 |
if (@transformations and my $top = $self->config->top)
|
|
165
|
0 |
0 |
@transformations < $top ? :
|
|
180
|
0 |
0 |
unless $transformer->prepare_to_scan_document($doc)
|
|
187
|
0 |
0 |
if ($type eq 'PPI::Document') { }
|
|
191
|
0 |
0 |
unless $doc->find($type)
|
|
206
|
0 |
0 |
if ($doc->line_is_disabled_for_transformer($line, $transformer))
|