| line |
true |
false |
branch |
|
46
|
0 |
0 |
if (@ARGV and not $$self{'in'}) |
|
49
|
0 |
0 |
if @ARGV |
|
52
|
0 |
0 |
if ($$self{'in'} and not $$self{'from'} and $$self{'in'} =~ /\.(\w+)$/) |
|
55
|
0 |
0 |
if ($$self{'out'} and not $$self{'to'} and $$self{'out'} =~ /\.(\w+)$/) |
|
59
|
0 |
0 |
unless $$self{'from'} |
|
61
|
0 |
0 |
unless $$self{'to'} |
|
63
|
0 |
0 |
unless exists $$extension_map{$$self{'from'}} |
|
65
|
0 |
0 |
unless exists $$extension_map{$$self{'to'}} |
|
79
|
0 |
0 |
if (my $in = $$self{'in'}) { } |
|
80
|
0 |
0 |
unless open my $fh, $in |
|
91
|
0 |
0 |
if (my $out = $$self{'out'}) { } |
|
92
|
0 |
0 |
unless open my $fh, $out |
|
103
|
0 |
0 |
unless my $from = $$self{'from'} |
|
105
|
0 |
0 |
unless my $class = $$compiler_map{$lang} |
|
107
|
0 |
0 |
unless eval "require $class; 1" |
|
114
|
0 |
0 |
unless my $to = $$self{'to'} |
|
116
|
0 |
0 |
unless my $class = $$emitter_map{$lang} |
|
118
|
0 |
0 |
unless eval "require $class; 1" |