| line |
true |
false |
branch |
|
736
|
0 |
1 |
if (ref $input eq 'HASH') |
|
739
|
0 |
0 |
if (defined $$input{$_} and not ref $$input{$_} and $$input{$_} =~ /\0/o) { } |
|
766
|
0 |
0 |
unless $$self{'conf'} = $self->_check_conf($conf) |
|
770
|
0 |
0 |
unless defined $$self{'conf'}{$_} |
|
790
|
0 |
0 |
if defined $sep |
|
822
|
0 |
0 |
if (defined $varval and ref $varval eq 'HASH') |
|
869
|
0 |
0 |
if ($self->is_submitted) |
|
872
|
0 |
0 |
if $$self{'cont'} ne '' |
|
925
|
0 |
0 |
if ref $_ eq 'CODE' |
|
930
|
0 |
0 |
if $$self{'cont'} |
|
964
|
0 |
0 |
if $$self{'call_make'} |
|
1021
|
0 |
0 |
$$self{'input'}{$self->get_formname} ? : |
|
1074
|
0 |
0 |
if ref $res eq 'ARRAY' and @$res == 1 |
|
1105
|
0 |
0 |
if defined $confirmsg |
|
1136
|
0 |
0 |
if (defined $$self{'input'}{$$self{'conf'}{'CONFIRMED'} or $$self{'skin_obj'}->get_default('main', 'CONFIRMED') or $$self{'skin_obj'}->get_default('default', 'CONFIRMED')}) |
|
1166
|
0 |
0 |
if (ref $skin) |
|
1253
|
0 |
0 |
if ($field) |
|
1256
|
0 |
0 |
if ($$_{'NAME'} eq $field) |
|
1281
|
0 |
0 |
if (ref $conf eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $conf eq 'HASH') { } |
|
1422
|
0 |
0 |
if (ref $conf eq 'ARRAY' and ref $$conf[0] eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $conf eq 'HASH' and ref $$conf{'sub'} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $conf eq 'HASH' and ref $$conf{'sub'} eq 'ARRAY') { } |
|
1431
|
0 |
0 |
if ($$self{'skin_obj'}->is_hidden($templ)) { } |
|
1432
|
0 |
0 |
unless ref $cache{'HIDDEN'} eq 'ARRAY' |
|
1439
|
0 |
0 |
if (ref $cache{'sub'}{$templ} ne 'ARRAY') |
|
1448
|
0 |
0 |
unless ref $$conf{'TEMPL'} eq 'ARRAY' |
|
1450
|
0 |
0 |
if (ref $$conf{'sub'}{$_} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $$conf{'sub'}{$_} eq 'ARRAY') { } |
|
1455
|
0 |
0 |
if ref $_ eq 'HASH' |
|
1463
|
0 |
0 |
if (ref $tmp eq 'HASH') |
|
1495
|
0 |
0 |
unless $var ne '' |
|
1498
|
0 |
0 |
if ($var eq 'TEMPL' or $var eq 'HIDDEN') { } |
|
1499
|
0 |
0 |
defined $$self{'varstack'}[-1]{$var} ? : |
|
1504
|
0 |
0 |
if (defined $$self{'varstack'}[$i]{$var}) |
|
1510
|
0 |
0 |
unless (defined $res) |
|
1513
|
0 |
0 |
if (defined $$self{'varstack_defaults'}[$i]{$var}) |
|
1522
|
0 |
0 |
if (defined $res and ref $res eq '') |
|
1523
|
0 |
0 |
if @history and grep {$res =~ /<&$_&>/;} @history |
|
1535
|
0 |
0 |
if (ref $res eq 'ARRAY' and defined $$self{'loop_var'}{$var} || @{$$self{'loop'};} > 0) |
|
1538
|
0 |
0 |
if (defined $$self{'loop_var'}{$var}) { } |
|
|
0 |
0 |
elsif ($var ne 'TEMPL') { } |
|
1546
|
0 |
0 |
if (ref $loop eq 'ARRAY') |
|
1548
|
0 |
0 |
if (defined $$res[$$loop[$i] + 1]) { } |
|
|
0 |
0 |
elsif ($flag) { } |
|
1549
|
0 |
0 |
$flag ? : |
|
1555
|
0 |
0 |
unless defined $res |
|
1556
|
0 |
0 |
if (ref $res ne 'ARRAY') |
|
1569
|
0 |
0 |
if $$self{'debug'} |
|
1592
|
0 |
0 |
unless defined $cont |
|
1596
|
0 |
0 |
if $c |
|
1598
|
0 |
0 |
$c == 0 ? : |
|
|
0 |
0 |
if $old eq '<' and grep {$p eq $_;} '&', '~', '!' |
|
1600
|
0 |
0 |
if ($c > 0 and grep {$old eq $_;} '&', '~', '!' and $p eq '>') |
|
1604
|
0 |
0 |
unless (grep {$_ > 0;} values %f) |
|
1606
|
0 |
0 |
if ($match =~ /^([A-Z_]+)&>$/) { } |
|
|
0 |
0 |
elsif ($match =~ /^(.*)&>$/) { } |
|
|
0 |
0 |
elsif ($match =~ /^(.*)~([A-Z_ ]*)~>$/s) { } |
|
|
0 |
0 |
elsif ($match =~ /^(.*)\!(?:([A-Z_ ]+)|([A-Z_\|]+))\!>$/s) { } |
|
1609
|
0 |
0 |
unless defined $res |
|
1614
|
0 |
0 |
if (/^(#?[a-z_]+[a-z_0-9]+)(?: (.*?))?$/) { } |
|
1618
|
0 |
0 |
if (defined $args) |
|
1623
|
0 |
0 |
if $args =~ /^,$/ |
|
1633
|
0 |
0 |
if (ref $$self{'nconf'}{$templ} eq 'ARRAY' and ref $$self{'nconf'}{$templ}[0] eq 'HASH') |
|
1636
|
0 |
0 |
if (ref $$self{'nconf'}{$templ}[0]{'sub'} eq 'HASH') { } |
|
1650
|
0 |
0 |
if (defined $$nconf_back{$templ}[0]{'sub'}) |
|
1662
|
0 |
0 |
unless ($handler = $$self{'skin_obj'}->get_handler($templ)) |
|
1675
|
0 |
0 |
if (not $templ =~ /^_/) { } |
|
1690
|
0 |
0 |
unless defined $res |
|
1708
|
0 |
0 |
if (not @itvars) { } |
|
1719
|
0 |
0 |
unless (defined $$self{'loop_var'}{$_}) |
|
1721
|
0 |
0 |
unless defined $$self{'loop_deep_var'}{$_} |
|
1724
|
0 |
0 |
if ($_ ne 'TEMPL' and $_ ne 'HIDDEN') |
|
1740
|
0 |
0 |
if (not @itvars) { } |
|
1741
|
0 |
0 |
unless ($$self{'loop_deep'}[@{$$self{'loop'};} - 1]) |
|
1744
|
0 |
0 |
if ($$self{'loop_deep_var'}{$_}[@{$$self{'loop_var'}{$_};} - 1]) |
|
1746
|
0 |
0 |
unless ($flag) |
|
1758
|
0 |
0 |
if ($$self{'loop_deep_var'}{$_}[@{$$self{'loop_var'}{$_};} - 1]) |
|
1760
|
0 |
0 |
unless ($flag) |
|
1768
|
0 |
0 |
if (not @itvars) { } |
|
1777
|
0 |
0 |
unless @{$$self{'loop_var'}{$_};} |
|
1786
|
0 |
0 |
if (defined $2 and $2 ne '') { } |
|
|
0 |
0 |
elsif (defined $3 and $3 ne '') { } |
|
1791
|
0 |
0 |
unless defined $_ and $_ ne '' and not ref $_ |
|
1793
|
0 |
0 |
unless $tmp |
|
1800
|
0 |
0 |
if defined $_ and $_ ne '' and not ref $_ |
|
1802
|
0 |
0 |
if $tmp |
|
1804
|
0 |
0 |
if $res ne '' |
|
1808
|
0 |
0 |
if (defined $res) |
|
1812
|
0 |
0 |
if (ref $res eq 'ARRAY' and $c == 1 and $i == length($cont) - 1) |
|
1834
|
0 |
0 |
if (ref $add eq 'HASH') |
|
1836
|
0 |
0 |
if ($$self{'debug'}) |
|
1851
|
0 |
0 |
if ($_ ne 'TEMPL' and $_ ne 'HIDDEN') |
|
1852
|
0 |
0 |
if (ref $$add{$_} eq 'ARRAY') |
|
1854
|
0 |
0 |
if (defined $$self{'loop_var'}{$_}) { } |
|
1878
|
0 |
0 |
if ($$self{'debug'}) |
|
1891
|
0 |
0 |
unless defined $valuevar |
|
1892
|
0 |
0 |
unless defined $namevar |
|
1896
|
0 |
0 |
if ($self->is_submitted and $$self{'use_input'} and not $self->_get_var('force_value') or $force) { } |
|
1900
|
0 |
0 |
if ref $res eq 'ARRAY' |
|
1907
|
0 |
0 |
defined $res ? : |
|
1913
|
0 |
0 |
if ($templ and ref $def eq 'HASH') |
|
1916
|
0 |
0 |
unless ref $$self{'conf'}{'sub'}{$templ} eq 'ARRAY' |
|
1919
|
0 |
0 |
if $$self{'cont'} |
|
1928
|
0 |
0 |
ref $_ ne 'ARRAY' ? : |
|
1936
|
0 |
0 |
if (defined $fname and $fname ne '') |
|
1937
|
0 |
0 |
if (ref $$self{'input'}{$fname} eq 'ARRAY') { } |
|
1943
|
0 |
0 |
if not $$self{'seperate'} or $_ ne ($$self{'conf'}{'SEPVAL'} || $$self{'skin_obj'}->get_default('main', 'SEPVAL')) |
|
1944
|
0 |
0 |
if ($_ eq ($$self{'conf'}{'SEPVAL'} || $$self{'skin_obj'}->get_default('main', 'SEPVAL')) or $i + 1 == @{$$self{'input'}{$fname};}) |
|
1945
|
0 |
0 |
@tmp > 1 ? : |
|
1952
|
0 |
0 |
defined $$self{'input'}{$fname} && (!$$self{'seperate'} || $$self{'input'}{$fname} ne ($$self{'conf'}{'SEPVAl'} || $$self{'skin_obj'}->get_default('main', 'SEPVAL'))) ? : |