| line |
true |
false |
branch |
|
70
|
0 |
2 |
if $tt |
|
75
|
2 |
0 |
if $arg{'template'} and %{$arg{'template'};} |
|
85
|
0 |
3 |
unless $file |
|
86
|
0 |
3 |
if $file =~ s[::][/]g |
|
96
|
0 |
3 |
unless $self->{$key} |
|
110
|
3 |
20 |
if ($command eq 'desc') |
|
115
|
5 |
18 |
if ($command eq 'name') |
|
121
|
0 |
23 |
if ($command eq 'noreturn') |
|
125
|
3 |
20 |
if ($command eq 'encoding') |
|
136
|
5 |
3 |
if (%{$info;}) |
|
139
|
5 |
0 |
if (defined $info->{'name'} and defined $info->{'sql'}) { } |
|
141
|
1 |
4 |
$scope eq 'new' ? : |
|
|
1 |
4 |
$scope eq 'new' ? : |
|
163
|
0 |
1 |
if ($cmd eq 'desc') { } |
|
|
1 |
0 |
elsif ($cmd eq 'param') { } |
|
|
0 |
0 |
elsif ($cmd eq 'sql') { } |
|
183
|
0 |
6 |
if ($cmd eq 'desc') { } |
|
|
0 |
6 |
elsif ($cmd eq 'param') { } |
|
|
6 |
0 |
elsif ($cmd eq 'sql') { } |
|
215
|
5 |
0 |
if (my $enc = $self->{'_enc'}) |
|
225
|
0 |
0 |
if @_ |
|
231
|
0 |
1 |
if @_ |
|
237
|
0 |
0 |
if @_ |
|
243
|
1 |
6 |
unless defined $self->{'param'} |
|
245
|
0 |
6 |
unless ref $self->{'param'} eq 'HASH' |
|
246
|
1 |
5 |
unless @_ |
|
247
|
4 |
1 |
if @_ == 1 |
|
254
|
4 |
1 |
unless $self->{'param'} |
|
256
|
0 |
1 |
if $@ |
|
263
|
0 |
0 |
if @_ |
|
269
|
0 |
6 |
if @_ |
|
284
|
16 |
7 |
unless %arg |
|
286
|
0 |
7 |
unless %{$self->{'_template_default'};} |