| line |
!l |
l&&!r |
l&&r |
condition |
|
182
|
0 |
0 |
110 |
$self->section_empty('before_eval') && $self->section_empty('after_eval')
|
|
387
|
139 |
210 |
94 |
$order > $ks->{'ACCEPT_ARGS'}{'order'} and $order < $ks->{'CALL'}{'order'}
|
|
398
|
285 |
52 |
106 |
$order > $ks->{'CALL'}{'order'} and $order < $ks->{'CLOSE_SUB'}{'order'}
|
|
429
|
0 |
0 |
4 |
$v->{'tx'} and $v->{'tx'}{'req'}
|
|
612
|
2 |
64 |
12 |
ref $sch eq 'ARRAY' && exists $sch->[1]{'default'}
|
|
622
|
0 |
2 |
0 |
$sch->[0] eq "array" and not $sch->[1]{'of'}
|
|
656
|
72 |
0 |
2 |
$argspec->{'stream'} && $sch->[0] eq 'array'
|
|
733
|
86 |
2 |
18 |
$argspec->{'req'} and $opt_va
|
|
857
|
8 |
2 |
4 |
$v->{'schema'} and $opt_vr
|
|
860
|
14 |
0 |
0 |
$v->{'statuses'} and $opt_vr
|
|
888
|
0 |
2 |
0 |
$sch->[0] eq "array" and not $sch->[1]{'of'}
|
|
1063
|
108 |
0 |
2 |
$wrap_logs->[-1] && $wrap_logs->[-1]{'normalize_schema'}
|
|
1075
|
108 |
4 |
0 |
$meta->{'features'} and $meta->{'features'}{'validate_args'}
|
|
1299
|
52 |
0 |
0 |
$Log_Wrapper_Code and log_is_trace()
|
| line |
l |
!l |
condition |
|
235
|
646 |
0 |
$self->{'_codes'}{$section} //= undef
|
|
243
|
536 |
104 |
$self->{'_codes'}{$section} //= undef
|
|
251
|
86 |
0 |
$self->{'_levels'}{$section} // 0
|
|
287
|
104 |
104 |
$prev_section_level //= 0
|
|
425
|
4 |
0 |
$meta->{'features'} // {}
|
|
444
|
74 |
34 |
$meta->{'args'} // {}
|
|
578
|
4 |
74 |
$args{'prefix'} // ""
|
|
579
|
4 |
74 |
$args{'argsterm'} // "%args"
|
|
656
|
0 |
74 |
$self->{'_args'}{'_extra_sah_compiler_args'} // {}
|
|
755
|
0 |
4 |
$args{'argsterm'} // "%args"
|
|
831
|
0 |
0 |
$hm->{'v'} //= 1
|
|
907
|
0 |
4 |
$self->{'_args'}{'_extra_sah_compiler_args'} // {}
|
|
950
|
0 |
4 |
$self->{'_args'}{'_extra_sah_compiler_args'} // {}
|
|
1057
|
2 |
110 |
$meta->{$wrap_log_prop} // []
|
|
1060
|
0 |
112 |
$args{'_compiled_package'} //= "Perinci::Sub::Wrapped"
|
|
1064
|
0 |
112 |
$args{'_embed'} //= 0
|
|
1065
|
0 |
112 |
$args{'_extra_sah_compiler_args'} //= undef
|
|
1068
|
0 |
112 |
$args{'indent'} //= " "
|
|
1069
|
10 |
102 |
$args{'convert'} //= {}
|
|
1070
|
0 |
112 |
$args{'compile'} //= 1
|
|
1071
|
2 |
110 |
$args{'log'} //= 1
|
|
1075
|
0 |
0 |
$args{'validate_args'} //= 0
|
|
1080
|
0 |
2 |
$args{'validate_args'} //= 0
|
|
1084
|
0 |
2 |
$args{'validate_args'} //= 0
|
|
1085
|
6 |
106 |
$args{'validate_args'} //= 1
|
|
1090
|
0 |
2 |
$args{'validate_result'} //= 0
|
|
1094
|
0 |
2 |
$args{'validate_result'} //= 0
|
|
1095
|
6 |
106 |
$args{'validate_result'} //= 1
|
|
1139
|
2 |
106 |
$meta->{$wrap_log_prop} // []
|
|
1157
|
12 |
96 |
$meta->{'args_as'} //= "hash"
|
|
1190
|
214 |
218 |
$hm->{'v'} //= 1
|
|
1302
|
0 |
0 |
$ENV{'LINENUM'} // 1
|
| line |
l |
!l&&r |
!l&&!r |
condition |
|
463
|
4 |
104 |
0 |
$new // $value
|
|
490
|
0 |
0 |
12 |
$as->{'slurpy'} // $as->{'greedy'}
|
|
539
|
0 |
0 |
12 |
$as->{'slurpy'} // $as->{'greedy'}
|
|
572
|
4 |
74 |
0 |
$args{'v'} // $self->{'_meta'}{'args'}
|
|
661
|
72 |
64 |
0 |
$mod_rec->{'use_statement'} // $mod_rec->{'name'}
|
|
752
|
0 |
4 |
0 |
$args{'v'} // $self->{'_meta'}{'args_rels'}
|
|
763
|
0 |
4 |
0 |
$cd_h->{'args'}{'lang'} //= $cd_h->{'default_lang'}
|
|
782
|
2 |
2 |
0 |
$mod_rec->{'use_statement'} // $mod_rec->{'name'}
|
|
912
|
4 |
6 |
0 |
$mod_rec->{'use_statement'} // $mod_rec->{'name'}
|
|
974
|
6 |
0 |
0 |
$args{'new'} // $old
|
|
1052
|
110 |
2 |
0 |
$sub or $sub_name
|
|
1063
|
2 |
2 |
108 |
$args{'_schema_is_normalized'} //= $wrap_logs->[-1] && $wrap_logs->[-1]{'normalize_schema'} ? 1 : 0
|
|
1096
|
0 |
0 |
112 |
$args{'core'} //= $ENV{'PERINCI_WRAPPER_CORE'}
|
|
1097
|
0 |
0 |
112 |
$args{'core_or_pp'} //= $ENV{'PERINCI_WRAPPER_CORE_OR_PP'}
|
|
1098
|
0 |
0 |
112 |
$args{'pp'} //= $ENV{'PERINCI_WRAPPER_PP'}
|
|
1103
|
110 |
0 |
2 |
not $sub_name or $sub
|
|
1226
|
102 |
2 |
0 |
$sub_ref_name // $sub_name
|
|
1309
|
0 |
0 |
52 |
$@ or not $wrapped
|