Branch Coverage

blib/lib/B/C.pm
Criterion Covered Total %
branch 15 3666 0.4


line true false branch
20 0 55 unless (keys %Config and exists $Config{'usecperl'})
26 55 0 if $] >= 5.008004
45 0 0 if ($section eq 'sv')
47 0 0 $] >= 5.009005 ? :
93 0 0 if $typename eq 'SV' and $] > 5.009005 and $] < 5.012 and not $C99
95 0 0 if $typename eq 'UNOPAUX'
96 0 0 if $typename =~ /^AVCO[WG]_/
103 0 0 if @_
111 0 0 if $dbg
118 0 0 if $B::C::check
120 0 0 if $B::C::debug{'flags'} and $section->[-1]{'dbg'}
121 0 0 if ($section->name eq 'sv')
128 0 0 if (/(s\\_[0-9a-f]+)/)
129 0 0 if (not exists $sym->{$1} and $1 ne 's\\_0')
132 0 0 if ($B::C::verbose)
134 0 0 if $caller eq 'B::C'
139 0 0 exists $sym->{$1} ? :
140 0 0 if ($dodbg and $section->[-1]{'dbg'}[$i])
143 0 0 if ($format eq "\t{ %s }, /* %s_list[%d] %s */%s\n") { }
178 0 0 if $section->[-1]{'nosplit'} > 0
201 0 0 if (not $nosplit and $section->{'count'} >= $section->{'max_lines'})
232 0 0 if $B::C::check
246 0 0 exists $sym->{$1} ? :
249 0 0 if (@{$section->[-1]{'evals'};})
251 0 0 if ($section->name ne 'init2') { }
269 0 0 if ($section->name eq 'init')
310 0 0 if $] >= 5.01
315 0 0 keys %main::mro:: > 10 ? :
319 55 0 if ($] >= 5.008) { }
341 55 0 if ($] >= 5.008001) { }
347 55 0 if ($] >= 5.01) { }
353 55 0 if ($] >= 5.018) { }
0 0 elsif ($] >= 5.014) { }
0 0 elsif ($] >= 5.012) { }
363 55 0 if ($] > 5.021006) { }
379 0 55 if ($] < 5.018) { }
394 55 0 if ($] > 5.021005)
398 0 55 if ($Config{'usecperl'} and $] >= 5.022002)
551 0 0 if $^O eq 'MSWin32'
559 55 0 unless $CPERL51
564 0 0 unless my $module = shift()
566 0 0 unless my $modlibname = shift()
573 0 0 unless $modlibname
581 0 0 unless my $module = shift()
0 0 unless my $modlibname = shift()
0 0 if $DynaLoader::dl_debug
0 0 if defined &$boots
0 0 unless $modlibname
0 0 if $DynaLoader::dl_debug and not -f $file
0 0 unless -f $file
0 0 if $DynaLoader::dl_debug
0 0 if ($boot_symbol_ref = DynaLoader::dl_find_symbol(0, $bootname))
0 0 unless (my $libref = DynaLoader::dl_load_file($file, 0))
0 0 if (@unresolved)
0 0 unless ($boot_symbol_ref = DynaLoader::dl_find_symbol($libref, $bootname))
0 0 if $DynaLoader::dl_debug
0 0 if $DynaLoader::dl_debug
680 0 0 if (@_) { }
681 0 0 if (@_) { }
685 0 0 if ($root)
688 0 0 $verbose ? :
712 0 0 if (not $op->can('sv')) { }
713 0 0 if ($op->can('name') and $op->name eq 'padsv')
716 0 0 if $pad[$op->targ] and $pad[$op->targ]->can('PV')
720 0 0 if (ref $op eq 'B::PMOP' and $op->pmreplroot->can('sv')) { }
723 0 0 unless $op->flags & 4
725 0 0 if $op->name eq 'const' and $op->flags & 64
726 0 0 unless $op->first->can('sv')
734 0 0 if ($sv and $$sv) { }
738 0 0 if $sv->can('PV')
739 0 0 if (ref $sv eq 'B::SPECIAL')
741 0 0 if $debug{'gv'}
744 0 0 if ($sv->FLAGS & 2048) { }
745 0 0 if $sv->isa('B::NULL')
747 0 0 if ($rv->isa('B::PVGV'))
749 0 0 if $$o
751 0 0 if $rv->isa('B::PVMG')
755 0 0 if ($op->name ne 'method_named') { }
0 0 elsif ($sv->isa('B::IV')) { }
769 0 0 if $pad[$op->targ] and $pad[$op->targ]->can('PV')
774 0 0 if ($PERL522)
816 0 0 if $sym eq 'sym_0'
818 0 0 if (defined $value) { }
822 0 0 if $warn_undefined_syms
840 0 0 if (not $PERL56 and utf8::is_utf8($s)) { }
852 0 0 if exists $stashtable{$name}
854 0 0 $flags ? :
858 0 0 if ($PERL518 and $name)
861 0 0 if (@isa and exists do { $name . '::' }->{'ISA'})
865 0 0 $len ? :
884 0 0 if ($PERL514) { }
0 0 elsif ($PERL510) { }
886 0 0 $C99 ? :
894 0 0 $PERL514 ? :
896 0 0 $C99 ? :
900 0 0 if $len
919 0 0 if defined $strtable{$cstring}
921 0 0 $const ? :
922 0 0 if (defined $max_string_len and $cur > $max_string_len) { }
927 0 0 if ($cstring ne '0')
937 0 0 unless ($fullname)
966 0 0 IsCOW($sv) || $cow && $PERL518 ? :
972 0 0 if ($rok and not $PERL56) { }
974 0 0 if $debug{'sv'}
975 0 0 $PERL510 ? :
977 0 0 if ($savesym =~ /get_cv/)
984 0 0 if ($pok) { }
986 0 0 $sv && $sv->can('CUR') && ref $sv ne 'B::GV' ? :
988 0 0 if ($] < 5.008008 and $cur > 100 and $fullname =~ / :pad\[0\]/ and $pv =~ /\0\0/)
990 0 0 if ($i > -1)
993 0 0 if $verbose
998 0 0 if ($gmg and $fullname) { }
1000 0 0 $fullname && ref $fullname ? :
1007 0 0 $PERL510 ? :
1008 0 0 $shared_hek ? :
1009 0 0 $const_strings || $iscow || $flags & 134217728 ? :
1011 0 0 if $shared_hek or $fullname and $fullname =~ / :pad/ || $fullname =~ /^DynaLoader/ && $pv =~ /^boot_/
1014 0 0 if $static and $pv =~ /::bootstrap$/
1015 0 0 if $static and $] > 5.017 and ref $sv eq 'B::PVMG'
1016 0 0 if $static and $const_strings and $fullname and $fullname =~ /^warnings::(Dead)?Bits/ || $fullname =~ /::AUTOLOAD$/
1018 0 0 if ($shared_hek and $pok and not $cur)
1019 0 0 if $debug{'pv'} or $debug{'hv'}
1020 0 0 unless $fullname =~ /unopaux_item.* const/
1023 0 0 if ($static and $PERL510)
1024 0 0 if $flags & 1073741824
0 0 if ($] < 5.016) { }
0 0 elsif ($] < 5.02 and $fullname =~ /(^svop const|::VERSION)$/) { }
0 0 elsif ($] < 5.022 and $flags & 1) { }
1027 0 0 if $debug{'pv'}
1031 0 0 if $debug{'pv'}
1035 0 0 if ($pok) { }
1047 0 0 if ($static and $] < 5.017006 and not $pv =~ /^0?$/)
1051 0 0 if ($const_strings and ref $sv eq 'B::PVMG' and $flags & 4194304 and $fullname =~ /ISA/)
1055 0 0 if ($static) { }
1058 0 0 if ($iscow and $PERL518) { }
1059 0 0 if ($B::C::Config::have_HEK_STATIC) { }
0 0 elsif ($cow) { }
1078 0 0 if ($savesym =~ /\)?get_cv/)
1084 0 0 if ($iscow) { }
1092 0 0 if ($shared_hek) { }
1093 0 0 if ($savesym eq 'emptystring') { }
1095 0 0 if $PERL518
1101 0 0 if ($iscow and $cur and $PERL518)
1119 0 0 $shared_hek ? :
0 0 if $debug{'pv'}
1130 0 0 unless defined $str
1131 0 0 if $dynamic and not length $str and not @_ and not $fullname =~ /unopaux_item.* const/
1137 0 0 if ($dynamic and defined $hektable{$hek_key})
1140 0 0 if (not $dynamic and defined $statichektable{$hek_key})
1143 0 0 if $utf8
1144 0 0 if $cstr eq '0'
1146 0 0 if (not $dynamic) { }
1151 0 0 if ($key =~ /\\000\\001"$/)
1156 0 0 if (not $utf8) { }
1171 0 0 if $debug{'pv'}
1191 0 0 unless defined $flags
1192 0 0 unless defined $type
1194 0 0 if ($] >= 5.009002) { }
1195 0 0 length $flags ? :
0 0 if $utf8
1205 0 0 if $name eq '__ANON__'
1207 0 0 unless defined $flags
1208 0 0 if ($] >= 5.009002) { }
1209 0 0 length $flags ? :
0 0 if $utf8
1221 0 0 unless ($ivdformat)
1222 0 0 $Config{'ivsize'} == 4 ? :
1228 0 0 if $Config{'ivsize'} == 2 * $Config{'ptrsize'}
1230 0 0 $ivx > $intmax ? :
1231 0 0 if ($ivx < -$intmax)
1234 0 0 if ($INC{'POSIX.pm'})
1236 0 0 if ($ivx == POSIX::LONG_MIN()) { }
0 0 elsif ($ivx == POSIX::LONG_MAX()) { }
1246 0 0 if $sval =~ /(NAN|inf)$/i
1256 0 0 if (defined $nvx)
1257 0 0 if ($Config{'d_isinf'} or $] < 5.012)
1258 0 0 if $nvx =~ /^Inf/i
1259 0 0 if $nvx =~ /^-Inf/i
1261 0 0 if $nvx =~ /^NaN/i and $Config{'d_isnan'} || $] < 5.012
1268 0 0 unless ($nvgformat)
1273 0 0 if ($nvgformat eq 'g')
1276 0 0 $Config{'uselongdouble'} ? :
1278 0 0 $nvx > $dblmax ? :
1279 0 0 if $nvx < -$dblmax
1280 0 0 if ($INC{'POSIX.pm'}) { }
1281 0 0 if ($nvx == POSIX::DBL_MIN()) { }
0 0 elsif ($nvx == POSIX::DBL_MAX()) { }
1289 0 0 if ($nvx == $dblmax)
1294 0 0 if ($Config{'d_longdbl'})
1296 0 0 if ($INC{'POSIX.pm'})
1299 0 0 if ($posix) { }
0 0 elsif ($nvx == $ldblmax) { }
1300 0 0 if ($nvx == $posix) { }
0 0 elsif ($nvx == POSIX::LDBL_MAX()) { }
1310 0 0 if $sval =~ /(NAN|inf)$/i
1311 0 0 if $sval =~ /^-?\d+$/
1317 0 0 if $debug{'mg'}
1318 0 0 if (not ref $sym) { }
1332 0 0 unless ($include_package{$pkg_heavy} or exists $savINC{$pkg_heavy})
1339 0 0 if $debug{'pkg'}
1353 0 0 unless $op->can('name')
1354 0 0 if ($op->type == $OP_CUSTOM)
1355 0 0 $verbose ? :
1357 0 0 $verbose ? :
0 0 $optimize_ppaddr ? :
1441 0 0 $MAD ? :
1443 0 0 if ($static =~ / %d,/) { }
1445 0 0 if (ref $op eq 'B::FAKEOP') { }
0 0 elsif ($] < 5.0210011) { }
1462 0 0 if ($B::C::Config::have_op_rettype)
1483 0 0 if ($op->type > 0 and $op->name eq 'entersub' and $op->first and $op->first->can('name') and $op->first->name eq 'pushmark' and $op->first->next->name eq 'const' && $op->first->next->flags == 34 || $op->first->next->name eq 'padsv' || $] < 5.01 && $op->first->next->name eq 'gvsv' && !$op->first->next->type && $op->first->next->next->name eq 'const' && $op->first->next->next->flags == 34)
1493 0 0 if ($] < 5.01 and not $op->first->next->type)
1496 0 0 if $debug{'cv'}
1498 0 0 if ($pv and not $pv =~ /[! \(]/) { }
1503 0 0 if $debug{'cv'}
1506 0 0 if ($op->type == $OP_CUSTOM)
1507 0 0 if $verbose
1511 0 0 if ($have_sibparent and not $op->moresib) { }
1513 0 0 if $verbose and $debug{'op'}
1527 0 0 if defined $sym
1528 0 0 unless $level
1530 0 0 unless $type
1531 0 0 if ($type == $OP_THREADSV)
1535 0 0 if ($type == $OP_UCFIRST)
1537 0 0 if ($] >= 5.013009)
1538 0 0 if $verbose
1539 0 0 unless $savINC{'utf8.pm'}
1544 0 0 if (ref $op eq 'B::OP')
1548 0 0 if ($op->name eq 'entertry')
1549 0 0 if $verbose
1556 0 0 if ($PERL510 and not $type and $OP_COP{$op->targ}) { }
1557 0 0 if $debug{'cops'}
1570 0 0 if ($ITHREADS and $] >= 5.017) { }
0 0 elsif ($ITHREADS and $] >= 5.016) { }
0 0 elsif ($ITHREADS and $] >= 5.015004) { }
0 0 elsif ($PERL512) { }
0 0 elsif ($PERL510) { }
1591 0 0 $ITHREADS ? :
1606 0 0 unless $optimize_ppaddr
1614 0 0 if $debug{'flags'}
1616 0 0 unless $optimize_ppaddr
1619 0 0 if $debug{'op'}
1643 0 0 unless $B::C::optimize_ppaddr
1649 0 0 unless $_[0]{'next'}
1650 0 0 unless $_[0]{'type'}
1651 0 0 unless $_[0]{'sibling'}
1652 0 0 unless $_[0]{'moresib'}
1653 0 0 unless $_[0]{'parent'}
1654 0 0 unless $_[0]{'ppaddr'}
1655 0 0 unless $_[0]{'targ'}
1656 0 0 unless $_[0]{'flags'}
1657 0 0 unless $_[0]{'private'}
1658 0 0 unless $_[0]{'rettype'}
1671 0 0 if $m
1672 0 0 if ($mo and $$mo)
1674 0 0 if $m ne 'first' or $op->flags & 4 and not $op->name eq 'const' && $op->flags & 64
1684 0 0 if defined $sym
1685 0 0 unless $level
1688 0 0 if $debug{'flags'}
1690 0 0 unless $optimize_ppaddr
1693 0 0 if ($op->name eq 'method' and $op->first and $op->first->name eq 'const')
1695 0 0 if (not $method and $ITHREADS)
1698 0 0 if $debug{'pkg'} and $ITHREADS
1700 0 0 if ($method =~ /^(maybe::next|maybe|next)::(method|can)$/) { }
0 0 elsif ($method =~ /^(NEXT|EVERY)::/) { }
1701 0 0 if $debug{'pkg'}
1706 0 0 if $debug{'pkg'}
1708 0 0 if $1 ne 'NEXT'
1717 0 0 if $s =~ /^(&sv_list|\-?\d+|Nullsv)/
1724 0 0 if defined $sym
1725 0 0 unless $level
1726 0 0 $op->name eq 'multideref' ? :
1735 0 0 if $debug{'flags'}
1738 0 0 $C99 ? :
1742 0 0 if (ref $item) { }
1745 0 0 if ($verbose)
1746 0 0 if ($op->name eq 'multideref') { }
0 0 elsif ($op->name eq 'signature') { }
1748 0 0 if $act == 1
1749 0 0 if $act == 2
1750 0 0 if $act == 3
1751 0 0 if $act == 4
1752 0 0 if $act == 5
1753 0 0 if $act == 6
1754 0 0 if $act == 8
1755 0 0 if $act == 9
1756 0 0 if $act == 10
1757 0 0 if $act == 11
1758 0 0 if $act == 12
1759 0 0 if $act == 13
1761 0 0 if $idx == 0
1762 0 0 if $idx == 16
1763 0 0 if $idx == 32
1764 0 0 if $idx == 48
1768 0 0 if $act == 0
1769 0 0 if $act == 1
1770 0 0 if $act == 2
1771 0 0 if $act == 3
1772 0 0 if $act == 4
1773 0 0 if $act == 5
1774 0 0 if $act == 6
1775 0 0 if $act == 7
1776 0 0 if $act == 8
1777 0 0 if $act == 9
1778 0 0 if $act == 10
1779 0 0 if $act == 11
1780 0 0 if $act == 12
1781 0 0 if $act == 13
1782 0 0 if $act == 14
1784 0 0 if $idx == 0
1785 0 0 if $idx == 16
1786 0 0 if $idx == 32
1792 0 0 if $debug{'hv'}
1793 0 0 $C99 ? :
1803 0 0 ($action & 48) == 16 ? :
1804 0 0 $constkey ? :
1805 0 0 if (is_constant($itemsym)) { }
1806 0 0 if (ref $item eq 'B::IV') { }
0 0 elsif (ref $item eq 'B::UV') { }
1808 0 0 $C99 ? :
1812 0 0 $C99 ? :
1815 0 0 $C99 ? :
1820 0 0 $C99 ? :
1828 0 0 unless $optimize_ppaddr
1861 0 0 if defined $sym
1864 0 0 unless $level
1871 0 0 if $debug{'flags'}
1874 0 0 if ($op->type == $OP_CUSTOM) { }
1876 0 0 if ($] >= 5.019003 and $op->name eq 'Devel_Peek_Dump' || $op->name eq 'Dump') { }
1877 0 0 if $verbose
1878 0 0 unless $B::C::Devel_Peek_Dump_added
1905 0 0 if $verbose
1910 0 0 unless $optimize_ppaddr
1921 0 0 if defined $sym
1922 0 0 unless $level
1929 0 0 if $debug{'flags'}
1931 0 0 unless $optimize_ppaddr
1934 0 0 if ($op->type == $OP_DBMOPEN) { }
0 0 elsif ($op->type == $OP_FORMLINE and $const_strings) { }
1937 0 0 unless $savINC{'AnyDBM_File.pm'}
1950 0 0 if ($svop->name eq 'const' and $svop->can('sv'))
1953 0 0 if ($sv and $sv->can('PV') and $sv->PV and $sv->PV =~ /~/m)
1955 0 0 if $debug{'pv'}
1968 0 0 if defined $sym
1969 0 0 unless $level
1976 0 0 if $debug{'flags'}
1978 0 0 unless $optimize_ppaddr
1988 0 0 if defined $sym
1990 0 0 unless $level
2006 0 0 if $debug{'flags'}
2008 0 0 unless $optimize_ppaddr
2018 0 0 if defined $sym
2019 0 0 unless $level
2021 0 0 $op->name eq 'method' ? :
2022 0 0 unless $C99
2023 0 0 $ITHREADS ? :
2025 0 0 $ITHREADS ? :
2026 0 0 if ($rclass =~ /^&sv_list/)
2035 0 0 $op->name eq 'method' ? :
2036 0 0 if ($first =~ /^&sv_list/)
2040 0 0 if not $C99 and $first eq 'Nullsv'
2042 0 0 if $debug{'flags'}
2043 0 0 unless $optimize_ppaddr
2046 0 0 if ($op->name eq 'method') { }
2057 0 0 if defined $sym
2058 0 0 unless $level
2062 0 0 if $debug{'flags'}
2064 0 0 unless $optimize_ppaddr
2075 0 0 unless my $p = shift()
2077 0 0 if $debug{'cv'} or $debug{'pkg'} and not grep({$p eq $_;} @package_pv)
2078 0 0 if @package_pv
2086 0 0 unless $name
2088 0 0 $cop ? :
2093 0 0 if (ref $name eq 'B::CV')
2100 0 0 unless defined $_
2102 0 0 if (defined &$method) { }
2103 0 0 if $debug{'cv'}
2108 0 0 if (my $parent = try_isa($_, $name))
2109 0 0 if $debug{'cv'}
2114 0 0 if $debug{'cv'}
2121 0 0 unless $method
2122 0 0 if (exists &$method) { }
2123 0 0 if $debug{'cv'}
2136 0 0 if ($op->can('name') and $op->name eq 'padsv' || $op->name eq 'method_named' || ref $op eq 'B::SVOP')
2140 0 0 if $cv and ref $cv->PADLIST eq 'B::SPECIAL'
2141 0 0 $cv && ref $cv eq 'B::CV' && ref $cv->PADLIST ne 'B::NULL' ? :
2145 0 0 $op->can('padix') ? :
2148 0 0 if (defined $t and ref $t ne 'B::SPECIAL') { }
0 0 elsif ($sv) { }
2149 0 0 $t->can('PVX') ? :
0 0 $sv->can('PV') ? :
2151 0 0 ref $t eq 'B::PVMG' && ref $t->SvSTASH ne 'B::SPECIAL' ? :
2152 0 0 wantarray ? :
2154 0 0 if $sv->can('PV')
2155 0 0 if $sv->can('STASH')
2156 0 0 wantarray ? :
2165 0 0 if ($op->can('name') and $op->name eq 'padsv') { }
2167 0 0 $r[1] ? :
0 0 wantarray ? :
2169 0 0 if (not $op->can('sv')) { }
2170 0 0 if (ref $op eq 'B::PMOP' and $op->pmreplroot->can('sv')) { }
2173 0 0 unless $op->flags & 4 or $op->name eq 'const' and $op->flags & 34 or $op->first->can('sv')
2179 0 0 if ($sv and $$sv)
2180 0 0 if ($sv->FLAGS & 2048) { }
2181 0 0 if $sv->isa('B::NULL')
2183 0 0 if ($rv->isa('B::PVGV'))
2185 0 0 if $$o
2187 0 0 if $rv->isa('B::PVMG')
2190 0 0 if ($op->name eq 'gvsv') { }
0 0 elsif ($op->name eq 'gv') { }
2191 0 0 wantarray ? :
2193 0 0 wantarray ? :
2195 0 0 $sv->can('NAME') ? :
0 0 $sv->can('STASH') ? :
2207 0 0 $op && ref $op eq 'B::COP' ? :
2212 0 0 if ($sym =~ /\(SV\*\)?\&PL_sv_(yes|no|undef|placeholder)/)
2221 0 0 if defined $sym
2222 0 0 unless $level
2225 0 0 if ($op->name eq 'aelemfast' and $op->flags & 128) { }
0 0 elsif ($op->name eq 'gv' and $op->next and $op->next->name eq 'rv2cv' and $op->next->next and $op->next->next->name eq 'defined') { }
2227 0 0 if $debug{'sv'}
2233 0 0 if (not $gvsv =~ /^DynaLoader::/) { }
2234 0 0 if $debug{'gv'}
2242 0 0 if ($svsym =~ /^(gv_|PL_.*gv)/) { }
0 0 elsif ($svsym =~ /^\([SAHC]V\*\)\&sv_list/) { }
2249 0 0 if $svsym =~ /^\(SV\*\)lexwarn/
2251 0 0 if ($op->name eq 'method_named')
2253 0 0 if $cv
2256 0 0 if ($MULTI and svimmortal($svsym))
2260 0 0 $is_const_addr ? :
2263 0 0 if $debug{'flags'}
2265 0 0 unless $optimize_ppaddr
2267 0 0 unless $is_const_addr
2275 0 0 if defined $sym
2276 0 0 unless $level
2278 0 0 if ($op->name eq 'method_named') { }
0 0 elsif ($op->name eq 'gv' and $op->next and $op->next->name eq 'rv2cv' and $op->next->next and $op->next->next->name eq 'defined') { }
2280 0 0 if $cv
2287 0 0 if ($op->name eq 'padsv' or $op->name eq 'gvsv' or $op->name eq 'gv')
2290 0 0 $op->can('padix') ? :
2292 0 0 if ($sv and $$sv)
2294 0 0 if ($skip_defined and not $name =~ /^DynaLoader::/) { }
2295 0 0 if $debug{'gv'}
2297 0 0 $name ? :
2303 0 0 if $debug{'flags'}
2305 0 0 unless $optimize_ppaddr
2313 0 0 if defined $sym
2315 0 0 unless $level
2318 0 0 if ($optimize_cop and $level and not $op->label and ref $prev_op ne 'B::LISTOP')
2322 0 0 if $debug{'cops'}
2328 0 0 if $debug{'cops'}
2334 0 0 $PERL510 ? :
2335 0 0 if ($is_special and $$warnings == 4) { }
0 0 elsif ($is_special and $$warnings == 5) { }
0 0 elsif ($is_special) { }
2352 0 0 if substr($warn_sv, 0, 3) eq '&sv'
2354 0 0 unless $optimize_warn_sv and $PERL510
2359 0 0 $PERL510 && !$is_special ? :
2361 0 0 if $Config{'usecperl'} and $] >= 5.022002
2367 0 0 if ($PERL512) { }
0 0 elsif ($PERL510) { }
2368 0 0 if ($ITHREADS and $] >= 5.017) { }
0 0 elsif ($ITHREADS and $] >= 5.016) { }
0 0 elsif ($ITHREADS and $] >= 5.015004 and $] < 5.016) { }
2371 0 0 !$dynamic_copwarn ? :
2382 0 0 $op->can('stashlen') ? :
0 0 !$dynamic_copwarn ? :
2395 0 0 !$dynamic_copwarn ? :
2406 0 0 $ITHREADS ? :
0 0 $ITHREADS ? :
0 0 !$dynamic_copwarn ? :
2414 0 0 if ($op->label)
2420 0 0 !$dynamic_copwarn ? :
2425 0 0 if ($op->label)
2433 0 0 !$dynamic_copwarn ? :
0 0 $PERL56 ? :
2442 0 0 if $debug{'flags'}
2444 0 0 unless $optimize_ppaddr
2448 0 0 if ($PERL510 and $op->hints_hash)
2450 0 0 if ($$hints)
2451 0 0 if (exists $cophhtable{$$hints}) { }
2455 0 0 if ref $hints eq 'B::RHE'
2462 0 0 if $k eq ':'
2464 0 0 if ($utf8) { }
2465 0 0 $i ? :
2468 0 0 $i ? :
2484 0 0 if ($add_label)
2487 0 0 if ($] >= 5.015001) { }
0 0 elsif ($] > 5.013004) { }
0 0 elsif (not $^O =~ /^(MSWin32|AIX)$/ || $ENV{'PERL_DL_NONLAZY'}) { }
2488 0 0 if $utf8 and $verbose
2495 0 0 if $i
2503 0 0 if ($PERL510 and not $is_special and not $isint) { }
2508 0 0 if ($copw)
2524 0 0 unless $optimize_warn_sv
2528 0 0 unless ($optimize_cop)
2531 0 0 if (not $ITHREADS) { }
2532 0 0 if ($const_strings) { }
2536 0 0 unless ($copgvtable{$constpv})
2552 0 0 if (not $mainfile) { }
2553 0 0 if $op->stashpv eq 'main'
2555 0 0 if $mainfile eq $op->file and $op->stashpv ne 'main'
2564 0 0 if ($] >= 5.021006 and $pmflags & 1 or $qstr =~ /\\P\{/) { }
2579 0 0 if defined $sym
2581 0 0 $PERL5257 ? :
2582 0 0 if ($] < 5.008008 and $ITHREADS and $$op < 256)
2586 0 0 unless $level
2592 0 0 if ref $replroot
2593 0 0 if ($ITHREADS and $op->name eq $pushre) { }
0 0 elsif (ref $replroot and $$replroot) { }
2594 0 0 if $debug{'gv'}
2601 0 0 if ($op->name eq $pushre) { }
2602 0 0 if $debug{'gv'}
2605 0 0 if $replstart
2608 0 0 if $replstart
2617 0 0 if ($PERL510) { }
0 0 elsif ($PERL56) { }
2624 0 0 $ITHREADS ? :
2627 0 0 if ($] >= 5.017)
2629 0 0 if ($code_list and $$code_list)
2631 0 0 if $debug{'gv'}
2633 0 0 if $code_op
2636 0 0 if $debug{'gv'}
2660 0 0 $ITHREADS ? :
0 0 $MULTI ? :
2665 0 0 if (not $MULTI and $op->pmstash)
2670 0 0 if $debug{'flags'}
2672 0 0 unless $optimize_ppaddr
2675 0 0 if (defined $re)
2678 0 0 if ($PERL510) { }
0 0 elsif ($PERL56) { }
2684 0 0 if $debug{'pv'} or $debug{'gv'}
2686 0 0 if ($] >= 5.013009 and $pmflags & 4)
2689 0 0 if ($PERL518 and not $swash_init and $swash_ToCf)
2697 0 0 if ($utf8 and $] >= 5.013009 and $pmflags & 1 or re_does_swash($qre, $pmflags)) { }
2701 0 0 if $debug{'sv'}
2703 0 0 if $debug{'sv'}
2705 0 0 if ($PERL518 and $op->reflags & 131072)
2712 0 0 if ($] > 5.008008) { }
2722 0 0 if $utf8
2724 0 0 if ($] >= 5.018 and $op->reflags & 131072)
2731 0 0 if ($PERL510 and $op->pmflags & 65536)
2732 0 0 ref $op->pmstash eq 'B::HV' ? :
0 0 $MULTI ? :
2750 0 0 if ($gvsym)
2751 0 0 if ($PERL510) { }
2765 0 0 unless @B::C::specialsv_name
2768 0 0 unless (defined $sym)
2779 0 0 if defined $sym
2782 0 0 if ($$sv == 0)
2783 0 0 if $verbose
2788 0 0 if $debug{'sv'}
2789 0 0 $PERL510 ? :
2792 0 0 if ($debug{'flags'} and !$ITHREADS || $PERL514 and $DEBUG_LEAKING_SCALARS)
2803 0 0 if defined $sym
2809 0 0 if $uvx > 2147483647
2811 0 0 if ($PERL524) { }
0 0 elsif ($PERL514) { }
0 0 elsif ($PERL510) { }
2824 0 0 if ($PERL524) { }
2825 0 0 $C99 ? :
0 0 $PERL510 ? :
2829 0 0 if ($Config{'ptrsize'} == 4 and not &IS_MSVC()) { }
2836 0 0 $C99 ? :
0 0 $PERL510 ? :
2840 0 0 if $debug{'flags'}
2843 0 0 if $debug{'sv'}
2850 0 0 if defined $sym
2853 0 0 if ($PERL512 and $svflags & 2048)
2856 0 0 if ($svflags & 2147483648)
2861 0 0 if ($svflags & 255 and not $svflags & 4352)
2862 0 0 unless ($PERL510 and $svflags & 65536 or not $PERL510 and $svflags & 256 or $] > 5.015002 and $svflags & 393218)
2868 0 0 if ($PERL524) { }
0 0 elsif ($PERL514) { }
0 0 elsif ($PERL510) { }
2880 0 0 if ($PERL524) { }
2881 0 0 $C99 ? :
2884 0 0 if ($Config{'ptrsize'} == 4 and not &IS_MSVC()) { }
2891 0 0 $C99 ? :
0 0 $PERL510 ? :
2894 0 0 if $debug{'flags'}
2897 0 0 if $debug{'sv'}
2904 0 0 if defined $sym
2906 0 0 if $nv =~ /^-?\d+$/
2908 0 0 $sv->FLAGS & 256 ? :
2909 0 0 if &IS_MSVC() and not $nv
2910 0 0 if ($PERL514) { }
0 0 elsif ($PERL510) { }
2921 0 0 $PERL510 ? :
2924 0 0 if $debug{'flags'}
2927 0 0 if $debug{'sv'}
2936 0 0 if defined $pv
2937 0 0 if (defined $max_string_len and length $pv > $max_string_len) { }
2949 0 0 if $debug{'sv'} or $debug{'pv'}
2954 0 0 if ($PERL510 and $sv and ($sv->FLAGS & 150994944) == 150994944) { }
2955 0 0 if $debug{'sv'}
2957 0 0 unless $hek eq 'NULL'
2958 0 0 if ($DEBUGGING)
2963 0 0 if (not $cstr and $cstr == 0)
2966 0 0 if ($sv and IsCOW($sv))
2968 0 0 unless ($cstr =~ /\\000\\00\d"$/)
2972 0 0 if $debug{'sv'}
2976 0 0 if $debug{'sv'}
2986 0 0 if (defined $sym)
2987 0 0 if ($in_endav)
2988 0 0 if $debug{'av'}
2996 0 0 if ($PERL514) { }
0 0 elsif ($PERL510) { }
3002 0 0 if $tmp_pvsym =~ /^hek/ and $static
3011 0 0 $C99 ? :
3023 0 0 if $debug{'flags'}
3025 0 0 if (not $static) { }
0 0 elsif ($tmp_pvsym eq 'NULL' and $pvsym =~ /^hek/) { }
3026 0 0 if ($PERL510) { }
3042 0 0 if (defined $sym)
3043 0 0 if ($in_endav)
3044 0 0 if $debug{'av'}
3051 0 0 if ($PERL514) { }
0 0 elsif ($PERL510) { }
3054 0 0 if $tmp_pvsym =~ /^hek/ and $static
3064 0 0 $C99 ? :
0 0 $PERL510 ? :
3068 0 0 if $debug{'flags'}
3070 0 0 if (defined $pv)
3071 0 0 if (not $static) { }
0 0 elsif ($tmp_pvsym eq 'NULL' and $pvsym =~ /^hek/) { }
3072 0 0 if ($PERL510) { }
3087 0 0 if (defined $sym)
3088 0 0 if ($in_endav)
3089 0 0 if $debug{'av'}
3098 0 0 if ($flags & 8704) { }
3102 0 0 if ($PERL510 and $C99 and not $PERL522) { }
0 0 elsif (not $PERL522) { }
3110 0 0 if ($PERL510) { }
3112 0 0 if ($PERL514) { }
3113 0 0 if $tmp_pvsym =~ /^hek/ and $static
3120 0 0 unless ($sv->FLAGS & 8704 or $PERL522)
3121 0 0 if $debug{'sv'}
3134 0 0 $C99 ? :
0 0 $PERL510 ? :
3138 0 0 if $debug{'flags'}
3140 0 0 if (defined $pv)
3141 0 0 if (not $static) { }
0 0 elsif ($tmp_pvsym eq 'NULL' and $pvsym =~ /^hek/) { }
3142 0 0 if ($PERL510) { }
3152 0 0 if $PERL518 and $sv->FLAGS & 1048576
3159 0 0 if not $PERL510 and defined $sym
3160 0 0 if $PERL510
3165 0 0 if ($PERL510) { }
3166 0 0 if $debug{'gv'}
3180 0 0 defined $pv && $static ? :
3188 0 0 if $debug{'flags'}
3190 0 0 if (not $static) { }
3193 0 0 if defined $pv and not $in_endav
3199 0 0 if ($PERL510) { }
3202 0 0 if ($] == 5.008009)
3214 0 0 if (defined $sym)
3215 0 0 if ($in_endav)
3216 0 0 if $debug{'av'}
3223 0 0 $PERL510 ? :
3224 0 0 if (not $shared_hek and IsCOW_hek($sv) || $len == 0 && $flags & 268435456)
3233 0 0 if ($PERL518 and ($fullname and $fullname eq 'svop const'))
3234 0 0 $DEBUGGING ? :
3241 0 0 if ($PERL510) { }
3243 0 0 if ($const_strings and not $shared_hek and $flags & 134217728 and not $len)
3246 0 0 if $debug{'pv'}
3248 0 0 if $tmp_pvsym =~ /^hek/ and $static
3249 0 0 $PERL514 ? :
3250 0 0 $PERL514 ? :
3252 0 0 $C99 ? :
0 0 $tmp_pvsym eq 'NULL' ? :
3257 0 0 if (defined $pv and not $static) { }
0 0 elsif ($shared_hek and $static and $pvsym =~ /^hek/) { }
3258 0 0 if ($shared_hek) { }
3260 0 0 unless $hek eq 'NULL'
3268 0 0 if ($debug{'flags'} and !$ITHREADS || $PERL514 and $DEBUG_LEAKING_SCALARS)
3269 0 0 cstring($pv) eq '0' ? :
3281 0 0 if (defined $pv and not $static)
3286 0 0 if $debug{'flags'}
3287 0 0 if $PERL518 and $flags & 1048576
3295 0 0 if (defined $sym)
3296 0 0 if ($in_endav)
3297 0 0 if $debug{'av'}
3310 0 0 if $refcnt < 1000
3317 0 0 unless ($pnsect)
3319 0 0 if $verbose
3329 0 0 if (&IS_MSVC())
3332 0 0 $ix || $len ? :
0 0 is_constant($sn) ? :
0 0 is_constant($tn) ? :
0 0 $refcnt >= 1000 ? :
3346 0 0 if $debug{'flags'}
3347 0 0 unless is_constant($sn)
3348 0 0 unless is_constant($tn)
3355 0 0 if ($lexwarnsym{$pv}) { }
3361 0 0 if ($] < 5.009) { }
3366 0 0 $Config{'longsize'} == 8 ? :
3368 0 0 if ($iv >= 0 and $iv <= 2) { }
3385 0 0 $] >= 5.008009 ? :
3393 0 0 if defined $sym
3401 0 0 $PERL514 ? :
3402 0 0 $] > 5.017006 ? :
3405 0 0 if $debug{'rx'} or $debug{'sv'}
3406 0 0 if ($] > 5.011)
3407 0 0 $PERL522 ? :
3408 0 0 re_does_swash($cstr, $pmflags) ? :
3409 0 0 if ($PERL518 and $sv->EXTFLAGS & 131072)
3415 0 0 if ($PERL518 and $sv->EXTFLAGS & 131072)
3419 0 0 if ($] < 5.017006) { }
3426 0 0 if $debug{'flags'}
3436 0 0 if $verbose
3438 0 0 unless $init2_remap{$key}{'MG'}
3445 0 0 if (ref $sv eq 'B::PVMG')
3447 0 0 $stash->can('NAME') ? :
3449 0 0 $sv->FLAGS & 16384 ? :
3454 0 0 if ($name =~ /encoding$/ and $name =~ /^(ascii|ascii_ctrl|iso8859_1|null)/ and $Encode::VERSION eq '2.58') { }
0 0 elsif ($pkg eq 'Encode::XS') { }
0 0 elsif ($Encode::VERSION ge '2.58' and Encode::find_encoding($name)) { }
0 0 elsif (defined $Net::DNS::VERSION and $Net::DNS::VERSION =~ /^0\.(6[789]|7[1234])/) { }
0 0 elsif ($pkg eq 'Net::LibIDN') { }
3456 0 0 if $pkg eq 'Encode::XS'
3457 0 0 if $fullname eq '(unknown)' and $ITHREADS
3458 0 0 if $verbose
3462 0 0 if ($fullname eq 'Encode::Encoding{iso-8859-1}') { }
0 0 elsif ($fullname eq 'Encode::Encoding{null}') { }
0 0 elsif ($fullname eq 'Encode::Encoding{ascii-ctrl}') { }
0 0 elsif ($fullname eq 'Encode::Encoding{ascii}') { }
3475 0 0 if ($name and $name =~ /^(ascii|ascii_ctrl|iso8859_1|null)/ and $Encode::VERSION gt '2.58') { }
3477 0 0 unless $name =~ /_encoding$/
3479 0 0 if $verbose
3481 0 0 if ($pkg ne 'Encode')
3489 0 0 if ($enc and ref $enc ne 'Encode::XS')
3494 0 0 if ($enc and ref $enc eq 'Encode::XS' and $sv->IVX == $$enc)
3497 0 0 unless $name =~ /_encoding$/
3499 0 0 if ($pkg ne 'Encode')
3506 0 0 if ($name) { }
3507 0 0 if $verbose
3516 0 0 if ref $enc ne 'Encode::XS'
3519 0 0 unless $pkg
3520 0 0 if $verbose
3525 0 0 if ($fullname eq 'svop const')
3527 0 0 unless $pkg
3536 0 0 if ($pkg and $name and $name =~ /^[a-zA-Z_0-9-]+$/) { }
3537 0 0 if $verbose
3540 0 0 if $fullname =~ /^(svop const|padop)/
3551 0 0 if (defined $sym)
3552 0 0 if ($in_endav)
3553 0 0 if $debug{'av'}
3563 0 0 if ($] >= 5.011 and ref $sv eq 'B::REGEXP') { }
3576 0 0 if (!$ITHREADS && $fullname && $fullname =~ /^svop const|^padop|^Encode::Encoding| :pad\[1\]/ || $ITHREADS and $sv->IVX > 65536 and ref $sv->SvSTASH ne 'B::SPECIAL')
3588 0 0 if ($PERL510) { }
3589 0 0 if ($sv->FLAGS & 2048)
3590 0 0 if $pvsym ne ''
3595 0 0 if ($PERL514) { }
3596 0 0 if $tmp_pvsym =~ /^hek/ and $static
3605 0 0 $C99 ? :
0 0 $tmp_pvsym eq 'NULL' ? :
3611 0 0 if ($pvsym =~ /PL_sv_undef/ and $ITHREADS)
3619 0 0 if $debug{'flags'}
3621 0 0 if (not $static) { }
0 0 elsif ($tmp_pvsym eq 'NULL' and $pvsym =~ /^hek/) { }
3623 0 0 if ($PERL510) { }
3639 0 0 if ($INC{'threads.pm'}) { }
3644 0 0 if $debug{'mg'}
3646 0 0 if $debug{'mg'}
3648 0 0 if ($INC{'threads/shared.pm'}) { }
3654 0 0 if $debug{'mg'}
3656 0 0 if $debug{'mg'}
3664 0 0 if $fullname and $fullname eq '%B::C::'
3665 0 0 if ($debug{'mg'})
3667 0 0 unless $fullname
3668 0 0 if $debug{'flags'} and $PERL510 and not $sv->MAGICAL
3671 0 0 $debug{'flags'} ? :
3677 0 0 if (ref $sv eq 'B::HV' and $] > 5.018 and $sv->MAGICAL and $fullname =~ /::$/) { }
0 0 elsif (ref $sv eq 'B::HV' and $] > 5.018 and $fullname =~ /(version|File)::$/) { }
3678 0 0 if $verbose
3682 0 0 if $verbose
3687 0 0 if ($pkg and $$pkg)
3688 0 0 $pkg->can('NAME') ? :
3690 0 0 if $debug{'mg'} or $debug{'gv'}
3693 0 0 unless ($fullname eq 'main::STDOUT' and $] >= 5.018)
3694 0 0 if (ref $pkg eq 'B::HV') { }
3695 0 0 if (not $fullname =~ /::$/ or $stash) { }
3705 0 0 if $debug{'mg'} or $debug{'gv'}
3709 0 0 if (ref $pkg eq 'B::HV')
3712 0 0 unless ref $sv eq 'B::IO'
3719 0 0 if $sv_flags & 134217728 and ref $sv ne 'B::HV'
3723 0 0 if ($PERL510 and not $sv->MAGICAL || $sv_flags & 268435456)
3726 0 0 $debug{'flags'} ? :
0 0 if $debug{'mg'}
3750 0 0 if ($debug{'mg'})
3759 0 0 unless ($type =~ /^[rDn]$/)
3764 0 0 unless $PERL510 and ref $obj eq 'SCALAR'
3766 0 0 if $type eq 'P'
3769 0 0 if ($len == -2) { }
0 0 elsif ($type eq 'r') { }
0 0 elsif ($type eq 'D') { }
0 0 elsif ($type eq 'n') { }
0 0 elsif ($type eq 'c') { }
0 0 elsif ($type eq ':') { }
3772 0 0 if (ref $ptr eq 'SCALAR') { }
0 0 elsif ($ptr and ref $ptr) { }
3779 0 0 if $debug{'mg'}
3782 0 0 unless ($mg->FLAGS & 2)
3788 0 0 $PERL56 ? :
3791 0 0 if (not $pmop) { }
3795 0 0 if ($PERL56) { }
3797 0 0 unless $relen
3802 0 0 if ($PERL510) { }
3826 0 0 $fullname eq 'main::-' ? :
3844 0 0 if defined $pmop_ptr
3845 0 0 $pmop ? :
3847 0 0 if not $pmop and $verbose
3849 0 0 defined $pmop_ptr ? :
0 0 $pmop ? :
3863 0 0 unless ($mg->FLAGS & 2)
3868 0 0 if $sv_flags & 134217728 and ref $sv ne 'B::HV'
3877 0 0 if defined $sym
3880 0 0 if $debug{'sv'}
3883 0 0 unless $rv
3884 0 0 if ($PERL510) { }
3888 0 0 if $flags & 9 and $PERL522
3891 0 0 $C99 && is_constant($rv) ? :
3893 0 0 if $debug{'flags'}
3896 0 0 if $] > 5.019 or $ITHREADS
3898 0 0 unless ($C99 and is_constant($rv))
3899 0 0 if ($rv =~ /get_cv/) { }
3909 0 0 if (ref $sv->RV eq 'B::GV' or $rv =~ /^gv_list/) { }
0 0 elsif ($sv->RV->isa('B::HV') and $sv->RV->NAME) { }
0 0 elsif ($rv =~ /get_cv/) { }
3936 0 0 if $debug{'flags'}
3944 0 0 if ($PERL510) { }
3945 0 0 if (is_using_mro()) { }
3953 0 0 if (exists do { $s }->{'ISA'})
3954 0 0 if (exists do { $s }->{'ISA'}{'ARRAY'})
3966 0 0 unless defined $cvstashname and defined $cvname
3967 0 0 if (my $found = $isa_cache{"${cvstashname}::$cvname"})
3976 0 0 if $debug{'cv'}
3978 0 0 if $_ eq $cvstashname
3979 0 0 if $debug{'cv'}
3980 0 0 if (defined &{$_ . '::' . $cvname;}) { }
3981 0 0 if (exists do { $cvstashname . '::' }->{'ISA'})
3989 0 0 if (&get_isa($_))
3991 0 0 if ($parent)
3994 0 0 if $debug{'gv'}
3995 0 0 if (exists do { $parent . '::' }->{'ISA'})
3996 0 0 if $debug{'pkg'}
3999 0 0 if (exists do { $_ . '::' }->{'ISA'})
4000 0 0 if $debug{'pkg'}
4012 0 0 if $savINC{'utf8_heavy.pl'}
4037 0 0 unless defined $cvstashname and defined $cvname
4038 0 0 if try_isa($cvstashname, $cvname)
4041 0 0 if (defined *{'UNIVERSAL::' . $cvname;}{'CODE'})
4042 0 0 if $debug{'cv'}
4047 0 0 if $debug{'cv'}
4048 0 0 if ($fullname eq 'utf8::SWASHNEW')
4058 0 0 if ($cvstashname =~ /^POSIX|Storable|DynaLoader|Net::SSLeay|Class::MethodMaker$/ or exists do { $cvstashname . '::' }->{'AUTOLOAD'} and grep(($_ eq 'AutoLoader'), @isa))
4064 0 0 if $debug{'cv'}
4065 0 0 unless $INC{"auto/$dir/$cvname.al"}
4066 0 0 unless ($@)
4067 0 0 if $verbose
4068 0 0 if defined &$fullname
4076 0 0 if (exists do { $cvstashname . '::' }->{'AUTOLOAD'} and not $PERL510)
4084 0 0 unless $DEBUGGING
4086 0 0 unless $DEBUGGING
4088 0 0 unless $DEBUGGING
4089 0 0 if $debug{'cv'}
4092 0 0 unless $DEBUGGING
4094 0 0 unless ($@)
4104 0 0 if $cvstashname and exists do { $cvstashname . '::' }->{'AUTOLOAD'}
4106 0 0 if $cvstashname and exists do { $cvstashname . '::' }->{'CLONE'}
4115 0 0 unless $PERL518
4116 0 0 if $cv->can('NAME_HEK')
4123 0 0 $_[0] =~ /^(BEGIN|INIT|UNITCHECK|CHECK|END)$/ ? :
4129 0 0 if (defined $sym)
4130 0 0 if $$cv and $debug{'cv'}
4133 0 0 $cv->is_named ? :
4137 0 0 if (not $gv and $cv->is_named) { }
0 0 elsif ($gv and $$gv) { }
4139 0 0 unless defined $fullname
4141 0 0 if $debug{'cv'}
4142 0 0 if ($fullname =~ /^(.*)::(.*?)$/)
4153 0 0 if ($PERL522 and $cvname eq '__ANON__')
4154 0 0 if ($origname) { }
4156 0 0 if $debug{'cv'}
4158 0 0 if $cvstashname
4160 0 0 if ($cvname =~ / :pad\[.*$/)
4162 0 0 if is_phase_name($cvname)
4165 0 0 if $debug{'cv'}
4169 0 0 if $debug{'cv'}
4174 0 0 if $debug{'cv'}
4177 0 0 if $all_bc_subs{$fullname} or skip_pkg($cvstashname)
4178 0 0 if $PERL514
4179 0 0 unless $include_package{$cvstashname}
4181 0 0 unless defined $cvstashname
4188 0 0 $PERL56 ? :
4191 0 0 if (not $isconst and $cvxsub and $cvname ne 'INIT')
4195 0 0 if ($cvname eq 'bootstrap' and not $xsub{$stashname}) { }
4198 0 0 if $verbose
4202 0 0 if (not $Config{'usedl'}) { }
0 0 elsif (not UNIVERSAL::isa($stashname, 'DynaLoader') and $stashname ne 'attributes' || $] >= 5.011) { }
4212 0 0 if ($file =~ /XSLoader\.pm$/)
4215 0 0 unless ($file)
4217 0 0 unless $laststash
4220 0 0 if (m[^(.+/)$sofile$])
4238 0 0 if $debug{'sub'}
4245 0 0 if (grep {$stashname eq $_;} @IO)
4256 0 0 if $debug{'sub'}
4257 0 0 if (in_static_core($stashname, $cvname)) { }
4260 0 0 if $debug{'cv'}
4261 0 0 if $stashname
4267 0 0 if $debug{'cv'}
4271 0 0 if (not $isconst and $cvxsub and $cvname eq 'INIT')
4273 0 0 if $debug{'sub'}
4278 0 0 if ($isconst and $cvxsub and not is_phase_name($cvname) and $PERL522 && !($CvFLAGS & 262144) && !($CvFLAGS & 16) && !($fullname && $fullname =~ qr/^File::Glob::GLOB/ && $CvFLAGS & 131076) || !($PERL522 || $CvFLAGS & 128))
4294 0 0 if $debug{'cv'}
4298 0 0 if ($] >= 5.016)
4300 0 0 if (ref $sv eq 'B::IV' || ref $sv eq 'B::PVMG' and $sv->FLAGS & 2048)
4302 0 0 if ($rv->FLAGS & 16640 and $rv->IVX > 65536)
4310 0 0 if ($sv and ref $sv and ref($sv) =~ /^(SCALAR|ARRAY|HASH|CODE|REF)$/) { }
0 0 elsif ($sv and ref($sv) =~ /^B::[ANRPI]/) { }
4312 0 0 if $debug{'cv'}
4326 0 0 if $verbose
4335 0 0 if ($new_cv_fw) { }
4339 0 0 if $debug{'flags'}
4347 0 0 if $debug{'cv'}
4348 0 0 if (not $$root and $] < 5.01)
4352 0 0 if ($fullname eq 'utf8::SWASHNEW')
4356 0 0 if ($fullname eq 'IO::Socket::SSL::SSL_Context::new')
4357 0 0 if ($IO::Socket::SSL::VERSION ge '1.956' and $IO::Socket::SSL::VERSION lt '1.995')
4365 0 0 unless ($$root or $cvxsub)
4367 0 0 if ($cvstashname =~ /^(bytes|utf8)$/) { }
0 0 elsif ($fullname eq 'Coro::State::_jit') { }
4374 0 0 if ($pl)
4381 0 0 if ($reloaded)
4382 0 0 if (not $cv->is_named) { }
4385 0 0 if $debug{'cv'}
4388 0 0 unless defined $fullname
4389 0 0 if ($fullname =~ /^(.*)::(.*?)$/)
4394 0 0 if $debug{'cv'}
4401 0 0 unless ($$root or $cvxsub)
4402 0 0 if (my $auto = try_autoload($cvstashname, $cvname))
4403 0 0 if (ref $auto eq 'B::CV') { }
4406 0 0 if ($$auto)
4411 0 0 if ($$gvnew)
4412 0 0 if ($cvstashname ne $gvnew->STASH->NAME or $cvname ne $gvnew->NAME)
4414 0 0 if $debug{'sub'}
4415 0 0 unless ($new_cv_fw)
4420 0 0 unless $PERL510
4424 0 0 defined objsym($cv) ? :
4425 0 0 if (my $oldsym = objsym($gv))
4426 0 0 if $debug{'gv'}
4436 0 0 if $verbose
4443 0 0 if ($$gv)
4444 0 0 if ($cvstashname ne $gv->STASH->NAME or $cvname ne $gv->NAME)
4446 0 0 if $verbose
4454 0 0 if ($$root or $cvxsub)
4455 0 0 if $verbose and $debug{'cv'}
4459 0 0 unless ($$root)
4460 0 0 if ($fullname ne 'threads::tid' and $fullname ne 'main::main::' and ($PERL510 and not defined &{$cvstashname . '::AUTOLOAD';}))
4466 0 0 if (exists &$fullname) { }
0 0 elsif ($cv->is_named) { }
4467 0 0 if $debug{'sub'}
4468 0 0 if $verbose or $debug{'sub'}
4472 0 0 if $debug{'sub'}
4474 0 0 if $debug{'sub'}
4475 0 0 if $verbose or $debug{'sub'}
4477 0 0 if ($sv_ix == $svsect->index and not $new_cv_fw) { }
4479 0 0 if $debug{'cv'}
4489 0 0 if $debug{'cv'} or $verbose
4502 0 0 if ($$root) { }
0 0 elsif ($cv->is_named) { }
0 0 elsif (not exists &$fullname) { }
4505 0 0 if $debug{'cv'} and $debug{'gv'}
4507 0 0 if ($cv->is_named) { }
0 0 elsif ($gv and $$gv) { }
4508 0 0 $cv->can('NAME_HEK') ? :
4517 0 0 ${$gv->FORM;} == $$cv ? :
4518 0 0 if ($gvname ne '__ANON__')
4519 0 0 $stashname eq 'main' ? :
4522 0 0 if ($gvname eq 'INIT')
4528 0 0 unless ($ppname)
4537 0 0 unless $startfield
4538 0 0 unless $startfield
4539 0 0 if ($$padlist)
4543 0 0 if $debug{'cv'} and $debug{'gv'}
4548 0 0 if $debug{'cv'} and $debug{'gv'}
4553 0 0 if ($] > 5.017 and $dyn_padlist || $fullname =~ /^(main::END|main::INIT|Attribute::Handlers)/) { }
4566 0 0 if $debug{'sub'}
4572 0 0 if $debug{'sub'}
4574 0 0 if $debug{'cv'}
4575 0 0 if $verbose or $debug{'sub'}
4580 0 0 unless ($new_cv_fw)
4583 0 0 if $PERL514
4584 0 0 if $gv and $$gv and $PERL514
4585 0 0 $PERL510 ? :
4592 0 0 if ($new_cv_fw)
4594 0 0 unless ($cvforward{$sym})
4604 0 0 defined $pv ? :
4606 0 0 defined $pv ? :
4608 0 0 if IsCOW($cv) and not $cow
4609 0 0 if $const_strings
4611 0 0 $PERL510 ? :
4614 0 0 if ($xcv_outside == ${main_cv();} and not $MULTI) { }
0 0 elsif (ref $cv->OUTSIDE eq 'B::CV') { }
4622 0 0 if ($PERL510) { }
0 0 elsif ($PERL56) { }
4626 0 0 $cur ? :
4629 0 0 if ($PERL522) { }
0 0 elsif ($PERL514) { }
4631 0 0 if $CPERL52
4645 0 0 if $xpvc =~ /, \(CV\*\)iv\d/
4646 0 0 if (not $new_cv_fw) { }
4655 0 0 $CPERL52 ? :
4658 0 0 if $debug{'flags'}
4677 0 0 if (not $new_cv_fw) { }
4688 0 0 if $debug{'flags'}
4692 0 0 ref $cv eq 'B::CV' ? :
4693 0 0 ref $cv eq 'B::CV' ? :
4712 0 0 if (not $new_cv_fw) { }
4723 0 0 if $debug{'flags'}
4726 0 0 if ($$cv)
4727 0 0 if ($PERL518 and !$gv || ref $gv eq 'B::SPECIAL') { }
4728 0 0 $cv->can('NAME_HEK') ? :
4729 0 0 unless defined $lexsub
4730 0 0 if $debug{'gv'}
4732 0 0 if (not $PERL56 and $utf8)
4745 0 0 if $gvstash and not $stash
4748 0 0 if $gvstash and $debug{'cv'} and $debug{'gv'}
4751 0 0 if ($cv->OUTSIDE_SEQ)
4753 0 0 if $cop
4763 0 0 if ($new_cv_fw) { }
4769 0 0 if $debug{'flags'}
4781 0 0 if ($new_cv_fw) { }
4788 0 0 if $debug{'flags'}
4794 0 0 if ($CPERL52 and $Config{'uselongdouble'})
4802 0 0 if ($xcv_outside == ${main_cv();} or ref $cv->OUTSIDE eq 'B::CV') { }
0 0 elsif ($] >= 5.017005 and $xcv_outside and $$padlist) { }
4804 0 0 if ($xcv_outside == ${main_cv();}) { }
4807 0 0 if ($$padlist)
4808 0 0 if ($PERL522) { }
0 0 elsif ($] >= 5.017005) { }
4824 0 0 if ($PERL522) { }
4833 0 0 if ($gv and $$gv)
4835 0 0 if $debug{'cv'} and $debug{'gv'}
4837 0 0 if ($PERL514) { }
4843 0 0 if ($CvFLAGS & 1024)
4846 0 0 $debug{'flags'} ? :
0 0 if $debug{'cv'}
4848 0 0 $debug{'flags'} ? :
4855 0 0 if $debug{'cv'} and $debug{'gv'}
4857 0 0 unless ($optimize_cop)
4859 0 0 if ($MULTI) { }
0 0 elsif ($const_strings and length $file) { }
4868 0 0 if ($$stash and ref $stash)
4876 0 0 if $cvname eq 'DESTROY' and $] >= 5.017011
4878 0 0 if $debug{'cv'} and $debug{'gv'}
4881 0 0 if ($magic and $$magic)
4884 0 0 unless ($new_cv_fw)
4885 0 0 $PERL510 ? :
4891 0 0 if ($cur)
4892 0 0 if $debug{'cv'}
4895 0 0 if (defined $pv)
4896 0 0 if ($PERL510 and $cur) { }
0 0 elsif (not $const_strings) { }
4906 0 0 if $xcv_outside
4917 0 0 if (defined $sym) { }
4918 0 0 if $debug{'gv'}
4924 0 0 if $debug{'gv'}
4928 0 0 if $debug{'gv'} and not $PERL56
4929 0 0 if ($PERL510 and not $PERL5257 and $gv->FLAGS & 1073741824)
4930 0 0 if $debug{'gv'}
4937 0 0 if (ref $gv->STASH eq 'B::SPECIAL') { }
4939 0 0 if $debug{'gv'}
4943 0 0 if skip_pkg($package)
4954 0 0 if ($filter and $filter =~ / :pad/) { }
4961 0 0 if ($fullname =~ /^threads::(tid|AUTOLOAD)$/ and not $ITHREADS)
4965 0 0 if ($PERL518 and $fullname =~ /^DynaLoader::dl_( require_symbols| modules| shared_objects| resolve_using| librefs)/x)
4982 0 0 if (not defined $gvname and $is_empty)
4985 0 0 $package eq 'main' ? :
4987 0 0 $] >= 5.008009 && $package eq 'main' ? :
4988 0 0 if $debug{'gv'}
5000 0 0 if ($fullname =~ /^(bytes|utf8)::AUTOLOAD$/)
5004 0 0 unless ($is_empty)
5006 0 0 unless (ref $egv eq 'B::SPECIAL' or ref $egv->STASH eq 'B::SPECIAL')
5008 0 0 if ($$gv != $$egv)
5011 0 0 if $debug{'gv'}
5020 0 0 if ($fullname =~ /^main::STDOUT$/i and $PERL56)
5037 0 0 if ($fullname eq 'main::' . $s)
5044 0 0 if ($fullname =~ /^main::std(in|out|err)$/) { }
0 0 elsif ($fullname eq 'main::0') { }
0 0 elsif ($ro_inc and $fullname =~ /^main::([0-9])$/) { }
5069 0 0 $notqual ? :
5070 0 0 if ($PERL510 and $gv->isGV_with_GP and not $is_coresym) { }
0 0 elsif (not $is_coresym) { }
5073 0 0 if (defined $egvsym and not $egvsym =~ /Null/) { }
0 0 elsif ($gp and exists $gptable{0 + $gp}) { }
0 0 elsif ($gp and not $is_empty and $gvname =~ /::$/) { }
0 0 elsif ($gp and not $is_empty) { }
5076 0 0 $debug{'flags'} ? :
0 0 if $debug{'gv'}
5078 0 0 $package eq 'main' ? :
5087 0 0 $debug{'flags'} ? :
0 0 if $debug{'gv'}
5096 0 0 $debug{'flags'} ? :
0 0 if $debug{'gv'}
5098 0 0 if 0 + $gp
5104 0 0 $debug{'flags'} ? :
0 0 if $debug{'gv'}
5117 0 0 if ($gvflags > 256 and not $PERL510)
5123 0 0 $debug{'flags'} ? :
0 0 $debug{'flags'} ? :
5124 0 0 $gv->LINE > 2147483647 ? :
0 0 unless $is_empty
5133 0 0 unless ($PERL510)
5138 0 0 if ($gv->REFCNT > 1)
5141 0 0 if $is_empty
5144 0 0 if ($gvrefcnt > 1)
5148 0 0 if $debug{'gv'}
5151 0 0 if (not $gvname =~ /^([^A-Za-z]|STDIN|STDOUT|STDERR|ARGV|SIG|ENV)$/) { }
0 0 elsif ($fullname eq 'main::!') { }
0 0 elsif ($fullname eq 'main::ENV' or $fullname eq 'main::SIG') { }
0 0 elsif ($fullname eq 'main::ARGV') { }
0 0 elsif ($fullname =~ /^main::STD(IN|OUT|ERR)$/) { }
5166 0 0 if $filter and not $filter =~ / :pad/ and $filter =~ /^\d+$/ and $filter > 0 and $filter < 64
5171 0 0 if (ref $gv eq 'B::STASHGV' and not $gvname =~ /::$/)
5178 0 0 if ($fullname eq 'attributes::bootstrap')
5179 0 0 unless (defined &{$package . '::bootstrap';})
5180 0 0 if $verbose
5184 0 0 if ($] >= 5.011) { }
5194 0 0 if ($PERL522 and $fullname =~ /^POSIX::M/)
5198 0 0 if ($savefields)
5200 0 0 if $debug{'gv'}
5202 0 0 if ($$gvsv and $savefields & 4)
5203 0 0 if $debug{'gv'}
5210 0 0 if ($fullname eq 'main::' . $s)
5214 0 0 if ($PERL5257 and $gvsv->MAGICAL)
5217 0 0 if ($mg->TYPE eq 'B')
5218 0 0 if $debug{'gv'}
5223 0 0 if ($gvname eq 'VERSION' and $xsub{$package} and $gvsv->FLAGS & 2048 and not $PERL56) { }
5224 0 0 if $debug{'gv'}
5234 0 0 if (exists $core_svs->{$gvname})
5235 0 0 if ($gvname eq '\\') { }
5238 0 0 if ref $gvsv eq 'B::PVMG'
5244 0 0 if ($fullname eq 'main::$')
5245 0 0 if $debug{'gv'}
5248 0 0 if $debug{'gv'}
5251 0 0 if ($$gvav and $savefields & 2)
5252 0 0 if $debug{'gv'}
5255 0 0 if ($fullname eq 'main::-')
5261 0 0 if ($$gvhv and $savefields & 1)
5262 0 0 if ($fullname ne 'main::ENV')
5263 0 0 if $debug{'gv'}
5264 0 0 if ($fullname eq 'main::!') { }
0 0 elsif ($fullname eq 'main::+' or $fullname eq 'main::-') { }
5271 0 0 if ($PERL514)
5281 0 0 if ($] >= 5.02 and $fullname eq 'Encode::Encoding') { }
0 0 elsif ($fullname ne 'main::INC') { }
5282 0 0 if $debug{'gv'}
5286 0 0 if exists $tmp_Encode_Encoding{$k}
5301 0 0 if (not $$gvcv and $savefields & 8)
5302 0 0 if $debug{'gv'}
5308 0 0 if $package and exists do { "${package}::" }->{'AUTOLOAD'}
5310 0 0 if $package and exists do { "${package}::" }->{'CLONE'}
5314 0 0 if ($$gvcv and $savefields & 8 and ref $gvcv eq 'B::CV' and ref $gvcv->GV->EGV ne 'B::SPECIAL' and not skip_pkg($package))
5324 0 0 if ($gvcv->XSUB and $oname ne '__ANON__' and $fullname ne $origname) { }
0 0 elsif (not $PERL510 or $gp) { }
5326 0 0 if $debug{'pkg'}
5331 0 0 if $package and defined &{"${package}::bootstrap";}
5338 0 0 if (my $dep = $hack_xs_detect{$package})
5342 0 0 if $debug{'gv'}
5349 0 0 if ($fullname eq 'Internals::V')
5354 0 0 if $debug{'gv'}
5357 0 0 if ($cvsym =~ /get_cv/) { }
0 0 elsif ($cvsym =~ /^(cv|&sv_list)/) { }
5358 0 0 if (not $xsub{$package} and in_static_core($package, $gvname)) { }
0 0 elsif ($xsub{$package}) { }
5361 0 0 if ($in_gv)
5367 0 0 if (/^\Q$sym = $gv_get;\E/)
5370 0 0 if $debug{'gv'}
5377 0 0 if $debug{'gv'}
5378 0 0 $oname ne '__ANON__' ? :
5385 0 0 if ($gvcv->XSUBANY)
5388 0 0 if ($package =~ /^DBI::(common|db|dr|st)/) { }
0 0 elsif ($package eq 'Tie::Hash::NamedCapture') { }
5394 0 0 if $verbose and $debug{'cv'}
5402 0 0 if ($anyptr and $xsubany > 1000) { }
0 0 elsif ($xsubany > 1048576 and $xsubany < 4294967040 || $xsubany > 4294967295) { }
0 0 elsif ($package eq 'Fcntl') { }
5408 0 0 if ($package eq 'POSIX' and $gvname =~ /^is/) { }
0 0 elsif ($package eq 'List::MoreUtils' and $gvname =~ /_iterator$/) { }
5416 0 0 if $verbose
5432 0 0 if $debug{'gv'} or $verbose
5436 0 0 if ($PERL514 and $cvsym and not $cvsym =~ /(get_cv|NULL|lexwarn)/ and $gv->MAGICAL)
5439 0 0 if ($mg->TYPE eq '<')
5442 0 0 unless ($mg->FLAGS & 2)
5449 0 0 if (not $PERL510 or $gp)
5450 0 0 if ($] > 5.009) { }
5456 0 0 if ($stash and $fullname =~ /::$/) { }
5461 0 0 if $file ne 'NULL' and not $optimize_cop
5468 0 0 unless $optimize_cop
5471 0 0 if $debug{'gv'} and not $ITHREADS
5474 0 0 if ($$gvform and $savefields & 16)
5475 0 0 if $debug{'gv'}
5479 0 0 if $PERL510
5480 0 0 if $debug{'gv'}
5483 0 0 if ($$gvio and $savefields & 32)
5484 0 0 if $debug{'gv'}
5485 0 0 if ($fullname =~ /::DATA$/ and $fullname eq 'main::DATA' || $save_data_fh) { }
0 0 elsif ($fullname =~ /::DATA$/ and not $save_data_fh) { }
5491 0 0 if $debug{'gv'}
5494 0 0 if $fh->opened
5503 0 0 if $debug{'gv'}
5510 0 0 if $debug{'gv'}
5517 0 0 if defined $sym
5519 0 0 unless $fullname
5523 0 0 if ($ispadnamelist or $ispadlist) { }
5528 0 0 if $@
5531 0 0 $ispadlist ? :
5532 0 0 if $ispadnamelist
5534 0 0 if ($PERL522 and $ispadnamelist) { }
0 0 elsif ($ispadlist and $] >= 5.021008) { }
0 0 elsif ($ispadlist and $] >= 5.017006 and $] < 5.021008) { }
0 0 elsif ($ispadlist and $] >= 5.017004) { }
0 0 elsif ($CPERL52 and $av_init and $fill > -1 and &isAvSTATIC($av) || canAvSTATIC($av, $fullname)) { }
0 0 elsif ($PERL514) { }
0 0 elsif ($PERL510) { }
5556 0 0 if ($cv and $cv->OUTSIDE and ref $cv->OUTSIDE ne 'B::SPECIAL' and $cv->OUTSIDE->PADLIST)
5558 0 0 if $outid
5566 0 0 if ($cv and $cv->OUTSIDE and ref $cv->OUTSIDE ne 'B::SPECIAL' and $cv->OUTSIDE->PADLIST)
5568 0 0 if $outid
5581 0 0 $flags & 134217728 || $fullname =~ /(::ISA|::INC|curpad_name)$/ ? :
5585 0 0 if ($magic eq 'D')
5589 0 0 $magic eq 'D' ? :
5591 0 0 $av_cow ? :
5593 0 0 if ($av_cow) { }
5594 0 0 unless exists $avcowsect{$n}
5597 0 0 unless exists $avcogsect{$n}
5605 0 0 unless $_->save($fullname . '[' . $count++ . ']')
5608 0 0 unless (is_constant($values[$i]))
5614 0 0 if ($alloc and $n) { }
5617 0 0 $av_cow ? :
0 0 if $debug{'av'}
5623 0 0 $C99 ? :
5629 0 0 if $debug{'av'}
5632 0 0 if $av_init or $av_init2
5642 0 0 if $av_init or $av_init2
5653 0 0 if $av_init or $av_init2
5654 0 0 if $PERL514
5665 0 0 if $av_init or $av_init2
5666 0 0 if $] < 5.009
5674 0 0 if $debug{'flags'}
5675 0 0 unless ($ispadlist or $ispadnamelist)
5681 0 0 if $PERL518 and $av->FLAGS & 1048576
5684 0 0 if ($debug{'av'})
5686 0 0 if $] < 5.009
5691 0 0 if ($fill > -1 and not $magic =~ /D/ and not $static_av) { }
5693 0 0 if ($debug{'av'})
5698 0 0 if ($el->can('FLAGS'))
5699 0 0 if $el->FLAGS & 256
5700 0 0 if $el->FLAGS & 1024
5725 0 0 if ($PERL510 and not $ispadlist)
5726 0 0 if $av->FLAGS & 1073741824
0 0 if ($] < 5.016) { }
5727 0 0 if $av->FLAGS & 1
5729 0 0 unless $_->save($fullname . '[' . $count++ . ']')
5733 0 0 if ($fullname =~ /^(INIT|END)$/ and $values[$i] and ref $array[$i] eq 'B::CV')
5734 0 0 if ($array[$i]->XSUB)
5739 0 0 if ($use_svpop_speedup and defined $values[$i] and defined $values[$i + 1] and defined $values[$i + 2] and $values[$i] =~ /^\&sv_list\[(\d+)\]/ and $values[$i + 1] eq '&sv_list[' . ($1 + 1) . ']' and $values[$i + 2] eq '&sv_list[' . ($1 + 2) . ']') { }
0 0 elsif ($use_av_undef_speedup and defined $values[$i] and defined $values[$i + 1] and defined $values[$i + 2] and $values[$i] =~ /^ptr_undef|&PL_sv_undef$/ and $values[$i + 1] =~ /^ptr_undef|&PL_sv_undef$/ and $values[$i + 2] =~ /^ptr_undef|&PL_sv_undef$/) { }
5770 0 0 $values[$i] ? :
5775 0 0 if ($ispadnamelist) { }
0 0 elsif ($ispadlist) { }
0 0 elsif ($av_init2) { }
0 0 elsif ($av_init) { }
5778 0 0 if $count
5790 0 0 if $count
5804 0 0 if $count
5805 0 0 if ($fill > -1)
5806 0 0 if ($PERL510) { }
5828 0 0 if $count
5829 0 0 $fill < 3 ? :
5830 0 0 if ($fill > -1)
5831 0 0 if $fullname eq 'END'
5833 0 0 if ($MYMALLOC) { }
5846 0 0 if ($PERL510) { }
5857 0 0 $fill < 3 ? :
5859 0 0 if $count
5876 0 0 if $max > -1 and not $static_av
5879 0 0 if $av_cow
5885 0 0 unless $fullname
5887 0 0 if defined $sym
5891 0 0 if ($name)
5894 0 0 if $debug{'hv'}
5903 0 0 if ($adpmroot)
5907 0 0 if ($PERL518 and $hv->FLAGS & 268435456 and length $name)
5909 0 0 if ($hv->Gv_AMG)
5915 0 0 $PERL514 ? :
5916 0 0 if (@enames > 1)
5917 0 0 if $debug{'hv'}
5941 0 0 $utf8 ? :
5954 0 0 unless ($stash)
5956 0 0 if ($PERL510 and (is_using_mro() and &mro::get_mro($name) eq 'c3'))
5959 0 0 if ($magic and $magic =~ /c/)
5960 0 0 if $debug{'mg'}
5966 0 0 if skip_pkg($name) or $name eq 'main'
5968 0 0 if $debug{'hv'}
5974 0 0 if ($PERL510) { }
5976 0 0 if $PERL522
5977 0 0 if ($PERL514) { }
5989 0 0 if (not $is_stash and ($] >= 5.01 and $hv->FLAGS & SVf_OOK()))
6011 0 0 if $debug{'flags'}
6014 0 0 if $debug{'hv'}
6017 0 0 $PERL510 && $hv->can('ARRAY_utf8') ? :
6021 0 0 unless $is_stash
6022 0 0 if $PERL518 and $hv->FLAGS & 1048576
6024 0 0 if (@contents) { }
0 0 elsif ($PERL514) { }
6035 0 0 if ref $sv eq 'B::RV' and defined objsym($sv) and $debug{'hv'}
6036 0 0 if ($is_stash) { }
6037 0 0 if (ref $sv eq 'B::GV' and $sv->NAME =~ /::$/) { }
6039 0 0 if $debug{'hv'}
6042 0 0 if $debug{'hv'}
6048 0 0 if $debug{'hv'}
6056 0 0 if ($length)
6058 0 0 $sym =~ /^hv|\(HV/ ? :
6062 0 0 if ($value)
6063 0 0 if not $value =~ /^&sv_list/ or $PERL510 and $] < 5.012
6067 0 0 if $utf8
6070 0 0 if $debug{'hv'}
6071 0 0 if (not $swash_ToCf and $fullname =~ /^utf8::SWASHNEW/ and $cstring eq '"utf8\\034unicore/To/Cf.pl\\0340"' and $cur == 23)
6075 0 0 if $verbose
6081 0 0 unless $PERL56
6088 0 0 if $hv->FLAGS & 134217728
6089 0 0 if ($magic =~ /c/)
6094 0 0 if ($PERL510 and $name and is_using_mro() and &mro::get_mro($name) eq 'c3')
6105 0 0 if $verbose
6108 0 0 if ($PERL56) { }
6116 0 0 unless $savINC{'PerlIO.pm'}
6117 0 0 unless $savINC{'PerlIO/scalar.pm'}
6129 0 0 if defined $sym
6131 0 0 unless defined $pv
6133 0 0 if ($pv) { }
6140 0 0 if ($cur) { }
6142 0 0 if IsCOW($io) and not $cow
6147 0 0 if $debug{'sv'} and $] > 5.008
6148 0 0 if ($PERL514) { }
0 0 elsif ($] > 5.011) { }
0 0 elsif ($PERL510) { }
6152 0 0 unless $verbose
6153 0 0 unless $verbose
6164 0 0 $pv_copy_on_grow ? :
6171 0 0 unless $verbose
6172 0 0 unless $verbose
6183 0 0 $pv_copy_on_grow ? :
6190 0 0 unless $verbose
6191 0 0 unless $verbose
6203 0 0 $pv_copy_on_grow ? :
6223 0 0 if $debug{'flags'}
6226 0 0 if ($PERL510 and not $pv_copy_on_grow and $cur)
6232 0 0 if ($$fsym)
6239 0 0 if $fsym
6243 0 0 unless ($PERL56 or $is_DATA)
6255 0 0 if ($io->IsSTD($_) or defined $fd and $fd == -$i)
6260 0 0 if ($perlio_func) { }
6281 0 0 if ($iotype eq "\000" or $iotype eq ' ') { }
0 0 elsif ($iotype =~ /[a>]/) { }
0 0 elsif ($iotype =~ /[<#\+]/) { }
6284 0 0 if $debug{'gv'}
6287 0 0 if $fd >= 3 or $verbose
6289 0 0 $iotype eq '>' ? :
6292 0 0 $fd < 3 ? :
0 0 $fd < 3 ? :
6297 0 0 if $fd >= 3 or $verbose
6302 0 0 if ($io->can('tell') and $tell = $io->tell)
6316 0 0 if ($PERL518)
6318 0 0 if ($stash and $$stash)
6325 0 0 if $debug{'gv'}
6337 0 0 unless $$sv
6344 0 0 if $check
6355 0 0 if ($PERL522)
6361 0 0 if ($CPERL52)
6369 0 0 if $symsect->comment and $verbose
6376 0 0 if ($lines)
6380 0 0 if ($typename eq 'SV*' and $name =~ /^(?:avco[gw])_(\d+)$/) { }
6382 0 0 if $name =~ /^avcow_/
6394 0 0 if ($MULTI) { }
6397 0 0 if ($] > 5.01903) { }
6402 0 0 if ($PERL510)
6408 0 0 if ($] < 5.008008)
6418 0 0 if ($] < 5.008009)
6428 0 0 if ($] < 5.013007)
6435 0 0 if ($] < 5.01301)
6445 0 0 if ($] >= 5.021005 and $] < 5.023)
6463 0 0 if (%init2_remap and not $HAVE_DLFCN_DLOPEN)
6469 0 0 if $decl->comment and $verbose
6475 0 0 if ($lines)
6479 0 0 if ($typename eq 'SV*' and $name =~ /^(?:avco[wg])_(\d+)$/) { }
6481 0 0 if $name =~ /^avcow_/
6486 0 0 if $section->comment and $verbose
6495 0 0 if @{$init0->[-1]{'values'};}
6499 0 0 if $init->comment and $verbose
6501 0 0 if $verbose
6502 0 0 if $init1->comment and $verbose
6505 0 0 if $verbose
6506 0 0 if $init2->comment and $verbose
6509 0 0 if (exists $xsub{$pkg})
6512 0 0 if ($stashfile)
6518 0 0 if ($remap)
6522 0 0 if ($HAVE_DLFCN_DLOPEN) { }
6531 0 0 if (exists $xsub{$pkg})
6532 0 0 if ($HAVE_DLFCN_DLOPEN) { }
6534 0 0 if $^O =~ /bsd/i
6548 0 0 if $verbose
6550 0 0 if ($HAVE_DLFCN_DLOPEN) { }
6571 0 0 if ($verbose)
6573 0 0 $caller eq 'B::CC' ? :
6593 0 0 if ($PERL510 and &IS_MSVC())
6601 0 0 if ($PERL510)
6629 0 0 if ($PERL522)
6657 0 0 if ($padnamesect{$s}->index >= 0)
6670 0 0 if ($PERL510 and not $PERL514)
6680 0 0 if ($B::C::Config::have_HEK_STATIC)
6690 0 0 if ($PERL510 and $] < 5.012 and not $C99)
6721 0 0 if ($PERL512) { }
0 0 elsif ($PERL510) { }
6730 0 0 if ($] == 5.01)
6735 0 0 if ($] >= 5.021001 and not $CPERL52)
6739 0 0 if $gv_index
6744 0 0 if $B::C::REVISION
6748 0 0 if $debug{'flags'} and $DEBUG_LEAKING_SCALARS
6749 0 0 if ($B::C::Config::have_independent_comalloc)
6809 0 0 if ($] < 5.008008)
6825 0 0 if $CPERL51 and $^O ne 'MSWin32'
6829 0 0 if ($av_init2 and $B::C::Config::use_declare_independent_comalloc)
6832 0 0 if ($av_init2)
6835 0 0 if ($last)
6841 0 0 if ($xpvav_sizes[$_] > 0) { }
6846 0 0 if $_ != $last
6847 0 0 unless ($_ + 1) % 30
6854 0 0 if (not $destruct) { }
6874 0 0 if ($] < 5.008009)
6898 0 0 if ($PERL510)
6910 0 0 if ($PERL510)
6922 0 0 if ($] < 5.008009)
6936 0 0 if (not $destruct) { }
7092 0 0 if ($s =~ /\(OP\*\)&unopaux_list/)
7227 0 0 if ($s =~ /^sv_list\[\d+\]\./) { }
0 0 elsif ($s =~ /^sv_list/) { }
0 0 elsif ($s =~ /^&sv_list/) { }
0 0 elsif ($s =~ /^\(HV\*\)&sv_list/) { }
0 0 elsif ($s =~ /^\(AV\*\)&sv_list/) { }
0 0 elsif ($s =~ /^&padnamelist_list/) { }
0 0 elsif ($s =~ /^&padname(_\d+)?_list/) { }
0 0 elsif ($s =~ /^cop_list/) { }
0 0 elsif ($s =~ /\(OP\*\)&unopaux_list/) { }
0 0 elsif ($s ne 'ptr_undef') { }
7249 0 0 if ($ITHREADS or not $MULTI)
7252 0 0 if ($] >= 5.017) { }
0 0 elsif ($] < 5.016 and $ITHREADS) { }
0 0 elsif ($] < 5.016 and not $ITHREADS) { }
7273 0 0 if ($CPERL51)
7274 0 0 $CPERL55 ? :
7277 0 0 if ($CPERL51)
7278 0 0 $CPERL55 ? :
7348 0 0 if ($CPERL51 and $debug{'cv'})
7369 0 0 if $verbose
7376 0 0 if $verbose
7380 0 0 if ($CPERL51 and $^O ne 'MSWin32')
7388 0 0 unless (exists $curINC{$incpack})
7389 0 0 if $debug{'pkg'}
7391 0 0 unless $static_ext{$stashname}
7394 0 0 unless ($xsub{$stashname} =~ /^Dynamic/ or $static_ext{$stashname})
7396 0 0 if $verbose
7411 0 0 if $ENV{'PERLMODS'}
7414 0 0 unless grep {$_ ne $perlmod;} @dl_modules
7418 0 0 unless ($xsub{$c} or $include_package{$c})
7420 0 0 if $verbose and not $skip_package{$c}
7427 0 0 if $verbose and $xsub{$c}
7433 0 0 if $verbose
7441 0 0 if ($stashname eq 'attributes' and $] > 5.011)
7445 0 0 if (not exists $xsub{$stashname} and $include_package{$stashname})
7448 0 0 unless $INC{$incpack}
7449 0 0 unless ($savINC{$incpack})
7453 0 0 if $verbose
7455 0 0 if (exists $xsub{$stashname} and $xsub{$stashname} =~ /^Dynamic/)
7458 0 0 if $xsub{$stashname} ne 'Dynamic'
7463 0 0 if (exists $xsub{$stashname} and $xsub{$stashname} =~ /^Dynamic-/ and $PERL522 || $staticxs)
7468 0 0 if $verbose and $debug{'cv'}
7470 0 0 if ($dl and not $curINC{'DynaLoader.pm'}) { }
0 0 elsif ($xs and not $curINC{'XSLoader.pm'}) { }
7483 0 0 if ($dl)
7487 0 0 if (grep {$_ eq $front;} @dl_modules)
7492 0 0 unless open XS, '>', $outfile . '.lst'
0 0 if ($staticxs)
7496 0 0 if $xs
7497 0 0 if $xs
7499 0 0 if $] < 5.008008
7501 0 0 if (exists $xsub{'Coro::State'} and grep {$_ eq 'Coro::State';} @dl_modules)
7513 0 0 if (exists $xsub{'EV'} and grep {$_ eq 'EV';} @dl_modules)
7523 0 0 if (exists $xsub{$stashname} and $xsub{$stashname} =~ /^Dynamic/) { }
7527 0 0 $] < 5.008008 ? :
7529 0 0 if ($xsub{$stashname} eq 'Dynamic') { }
7531 0 0 if $verbose
7541 0 0 if ($] >= 5.015003 and $stashfile)
7542 0 0 if ($CPERL51)
7552 0 0 if (/$needle/)
7557 0 0 unless ($sofile)
7560 0 0 if ($stashname eq 'Cwd' and not $stashfile =~ /Cwd/)
7575 0 0 if $verbose
7578 0 0 if ($] >= 5.015003) { }
7580 0 0 unless (grep /^DynaLoader$/, &get_isa($stashname))
7584 0 0 if $debug{'gv'}
7588 0 0 if $stashfile
7594 0 0 if ($staticxs)
7598 0 0 if $path
7599 0 0 unless $laststash
7604 0 0 if (m[^(.+/)$sofile$])
7606 0 0 if $verbose
7611 0 0 if $sofile
7612 0 0 if $sofile and $verbose
7618 0 0 if ($PERL522 or $staticxs) { }
7621 0 0 if ($PERL522 and $staticxs) { }
7639 0 0 !$xsub{$stashname} ? :
0 0 if $verbose
7648 0 0 if $xs
7651 0 0 if $staticxs
7657 0 0 if (not defined $module)
7687 0 0 if ($ITHREADS and $] > 5.007)
7710 0 0 unless $PERL56
7711 0 0 if ($] >= 5.008009)
7718 0 0 unless ($PERL510)
7742 0 0 if (not $PERL56 and ${^TAINT})
7766 0 0 if ($use_perl_script_name) { }
7777 0 0 if $^H
7778 0 0 if ${^UNICODE}
7784 0 0 if $; ne "\034"
7785 0 0 if $" ne ' '
7787 0 0 if ($PERL56) { }
7788 0 0 if $,
7789 0 0 if $\
7791 0 0 if $,
7792 0 0 if $\
7794 0 0 if $/ ne "\n"
7795 0 0 if $|
7797 0 0 if $^A
7798 0 0 if $^L ne "\f"
7799 0 0 if $main::: ne " \n-"
7800 0 0 if $^ ne 'STDOUT_TOP'
7802 0 0 if $~ ne 'STDOUT'
7804 0 0 if $%
7805 0 0 unless $- == 0 or $- == 60
7806 0 0 if $= != 60
7809 0 0 if $[
7810 0 0 if ($] < 5.01)
7833 0 0 if $init1->index >= 0
7834 0 0 unless defined $module
7835 0 0 if $init2->index >= 0
7841 0 0 if (not $destruct) { }
7842 0 0 if $verbose
7902 0 0 if $debug{'gv'} and $verbose
7907 0 0 if $package ne 'main' and not $include_package{$package}
7908 0 0 if $package eq 'main' and $name =~ /^([^\w].*|_\<.*|INC|ARGV|SIG|ENV|BEGIN|main::|!)$/
7911 0 0 if $debug{'gv'}
7912 0 0 unless $$cv or $$av or $$sv or $$hv or $gv->IO or $gv->FORM
7913 0 0 if ($$cv and $name eq 'bootstrap' and $cv->XSUB)
7915 0 0 if $debug{'gv'}
7918 0 0 if ($$cv and in_static_core($package, $name) and ref $cv eq 'B::CV' and $cv->XSUB)
7920 0 0 if $debug{'gv'}
7922 0 0 unless ($dumped_package{$package})
7928 0 0 if ($package eq 'B::C')
7929 0 0 if $debug{'gv'}
7932 0 0 if ($fullname =~ /^(bytes|utf8)::AUTOLOAD$/)
7936 0 0 if $fullname eq 'B::walksymtable' or $fullname eq 'B::C::walksymtable'
7939 0 0 if ($name eq 'Config')
7940 0 0 unless $include_package{'Config'}
7942 0 0 unless exists $dumped_package{$package} or $package =~ /::$/
7943 0 0 if $debug{'gv'}
7955 0 0 unless defined $prefix
7960 0 0 if $prefix eq 'utf8::' and defined $symref->{'SWASHNEW'}
7967 0 0 if $a eq $v
7968 0 0 if $b eq $v
7978 0 0 if ($sym =~ /::$/) { }
7980 0 0 if (svref_2object(\*$sym)->NAME ne 'main::' and $sym ne '::' and &$recurse($sym))
7992 0 0 if $dumped_package{$package}
7993 0 0 if $debug{'pkg'} and $verbose
8003 0 0 unless defined $prefix
8005 0 0 if ($sym =~ /::$/)
8008 0 0 if ($sym ne 'main::' and $sym ne '::')
8024 0 0 if $] < 5.01
8025 0 0 if skip_pkg($package)
8026 0 0 if (not $include_package{$package} or $force)
8028 0 0 if $verbose and $debug{'pkg'}
8030 0 0 if grep {$package eq $_;} @IO
8031 0 0 if $package eq 'XSLoader'
8032 0 0 if $package =~ /^B|Carp$/
8034 0 0 if (exists $include_package{$package} and not $include_package{$package} and $savINC{inc_packname($package)}) { }
8038 0 0 $force ? :
0 0 if $verbose
8045 0 0 $force ? :
0 0 if not $include_package{$package} and $verbose and $debug{'pkg'}
8047 0 0 if $] < 5.01
8048 0 0 unless $walkall
8051 0 0 if (@isa)
8055 0 0 if $isa eq $package
8056 0 0 if ($isa eq 'DynaLoader')
8057 0 0 unless (defined &{$package . '::bootstrap';})
8058 0 0 if $verbose
8062 0 0 unless ($include_package{$isa} or $skip_package{$isa})
8064 0 0 if $verbose
8066 0 0 if (exists $include_package{$isa}) { }
8067 0 0 if $verbose
8085 0 0 if ($stashname eq 'UNIVERSAL')
8088 0 0 unless %static_core_pkg
8090 0 0 if $static_core_pkg{$stashname}
8091 0 0 if ($stashname eq 'mro')
8094 0 0 if ($stashname eq 're')
8097 0 0 if ($stashname eq 'PerlIO')
8100 0 0 if ($stashname eq 'PerlIO::Layer')
8111 0 0 if $CPERL51
8112 0 0 if $] < 5.011
8113 0 0 if $] >= 5.01
8114 0 0 unless $PERL514
8118 0 0 if $^O eq 'cygwin'
8119 0 0 if $^O eq 'NetWare'
8120 0 0 if $^O eq 'os2'
8121 0 0 if $^O eq 'VMS'
8129 0 0 if ($package =~ /^(main::)?(Internals|O)::/ or $package =~ /^B::C::/ or $package eq '__ANON__' or index($package, ' ') != -1 or index($package, '(') != -1 or index($package, ')') != -1 or exists $skip_package{$package} or $DB::deep and $package =~ /^(DB|Term::ReadLine)/)
8147 0 0 if (exists $all_bc_deps{$pkg} and $can_delete_pkg)
8155 0 0 if (skip_pkg($package))
8156 0 0 if can_delete($package)
8159 0 0 if $package =~ /::::/
8161 0 0 if $debug{'pkg'}
8162 0 0 if index($package, ' ') != -1
8163 0 0 if index($package, '(') != -1
8164 0 0 if index($package, ')') != -1
8166 0 0 if ($package eq 'mro')
8168 0 0 if (not is_using_mro()) { }
8169 0 0 if $debug{'pkg'}
8172 0 0 if $debug{'pkg'}
8177 0 0 if ($package eq 'attributes' and $] > 5.011 and grep {$_ eq 'attributes';} @DynaLoader::dl_modules)
8183 0 0 if (exists $all_bc_deps{$package})
8190 0 0 if $u =~ /^$p\:\:/ and $include_package{$package}
8195 0 0 if ($] > 5.015001 and exists $all_bc_deps{$package} and not exists $curINC{$incpack} and $savINC{$incpack})
8198 0 0 if $debug{'pkg'}
8202 0 0 if ($package =~ /^DynaLoader|XSLoader$/ and $use_xsloader or not exists $all_bc_deps{$package})
8207 0 0 if ($mainfile)
8211 0 0 if (defined &{$package . '::' . $sym;})
8214 0 0 if ($cv and $cv->can('FILE') and $cv->FILE)
8215 0 0 if $mainfile eq $cv->FILE
8222 0 0 if ($savINC{'overload.pm'} and exists do { $package . '::' }->{'OVERLOAD'} and exists do { $package . '::' }->{'()'})
8230 0 0 if (exists $include_package{$package})
8231 0 0 if (not exists $all_bc_deps{$package}) { }
0 0 elsif (not $include_package{$package}) { }
8234 0 0 if $debug{'pkg'}
8237 0 0 if can_delete($package)
8238 0 0 if $debug{'pkg'}
8240 0 0 if $debug{'pkg'}
8246 0 0 unless ($all_bc_deps{$package})
8251 0 0 if (UNIVERSAL::can($package, $m) and not $package =~ /^(B::C|version|Regexp|utf8|SelectSaver)$/)
8252 0 0 if $package eq 'utf8' and $m eq 'DESTROY'
8255 0 0 if $package =~ /^(Errno|Tie::Hash::NamedCapture)$/ and $m eq 'TIEHASH'
8257 0 0 if $package eq 'Config' and $m =~ /DESTROY|TIEHASH/
8259 0 0 if $package =~ /^(FileHandle|IO::File|IO::Handle)/ and $m eq 'new'
8260 0 0 if $debug{'pkg'}
8265 0 0 if (not $package =~ /^PerlIO/ and can_delete($package))
8268 0 0 if (can_delete($package)) { }
0 0 elsif (not exists $all_bc_deps{$package}) { }
8269 0 0 if $debug{'pkg'}
8272 0 0 if $debug{'pkg'}
8291 0 0 if ($package =~ /^(Config_git\.pl|Config_heavy.pl)$/)
8294 0 0 if ($package eq 'utf8_heavy.pl')
8305 0 225 if $dumped_package{$package}
8307 0 0 if $package =~ /^DynaLoader|XSLoader$/ and defined $use_xsloader and $use_xsloader == 0
8310 0 225 if $^O eq 'MSWin32' and $package =~ /^Carp|File::Basename$/
8312 0 225 if ($curINC{$incpack})
8314 0 0 unless $savINC{$incpack}
8324 0 0 unless ($curINC{$incpack})
8325 0 0 if ($savINC{$incpack}) { }
8326 0 0 if $debug{'pkg'}
8329 0 0 if $package =~ /^DynaLoader|XSLoader$/
8331 0 0 if $debug{'pkg'}
8334 0 0 if (-e $p)
8336 0 0 unless $curINC{$incpack}
8344 0 0 unless defined $prefix
8346 0 0 if $savINC{inc_packname(substr($prefix, 0, -2))}
8349 0 0 unless $ref
8352 0 0 if ($sym =~ /::$/)
8354 0 0 if $debug{'pkg'} and $debug{'walk'}
8357 0 0 if ($sym ne 'main::' and $sym ne '::' and &$recurse($sym))
8367 0 0 if ($debug{'unused'})
8371 0 0 $module ? :
8379 0 0 if ($verbose)
8380 0 0 $sav_debug{'unused'} ? :
8386 0 0 $main eq 'main::' ? :
8387 0 0 $sav_debug{'unused'} ? :
0 0 if $verbose
8391 0 0 if $dumped_package{$_}
8392 0 0 if $verbose
8394 0 0 if (not $walkall) { }
8401 0 0 if $dumped_package{$_}
8403 0 0 if $walkall_cnt++ > 3
8407 0 0 if ($sav_debug{'unused'})
8414 0 0 if (exists $INC{'unicore/To/Title.pl'} or exists $INC{'unicore/To/Tc.pl'} or exists $INC{'unicore/Heavy.pl'} or $savINC{'utf8_heavy.pl'} and $fold || exists $savINC{'utf8.pm'})
8418 0 0 unless $savINC{'utf8.pm'}
8426 0 0 if ($] >= 5.013005 and ($warnings and exists $dumped_package{'Carp'}))
8432 0 0 if ($xsub{'EV'} and $dumped_package{'EV'} and $EV::VERSION le '4.21')
8439 0 0 if ($use_xsloader)
8450 0 0 if ($CPERL51)
8458 0 0 if ($package =~ /^(Config_git\.pl|Config_heavy.pl)$/ and not $dumped_package{'Config'}) { }
0 0 elsif ($package eq 'utf8_heavy.pl' and not $include_package{'utf8'}) { }
0 0 elsif (not $walkall || exists $dumped_package{$pkg}) { }
8470 0 0 unless (exists $curINC{$p})
8475 0 0 if ($debug{'pkg'} and $verbose)
8481 0 0 if ($walkall)
8483 0 0 if $again and $rec_cnt < 2
8488 0 0 unless exists $dumped_package{$pkg}
8490 0 0 if (not exists $curINC{$p} and exists $INC{$p})
8495 0 0 if ($debug{'pkg'} and $verbose)
8496 0 0 if @deleted_inc
8504 0 0 if $verbose or $debug{'pkg'}
8509 0 0 if ($include_package{$p} and not exists $dumped_package{$p} and not $static_core_pkg{$p} and not $p =~ /^(threads|main|__ANON__|PerlIO)$/)
8514 0 0 if ($p eq 'warnings::register' and not $warnings)
8519 0 0 if $verbose or $debug{'pkg'}
8533 0 0 unless my $package = shift()
8535 0 0 if grep {$_ eq $package;} @made_c3
8544 0 0 if $verbose or $debug{'pkg'}
8559 0 0 if $verbose
8561 0 0 if $save_sig
8565 0 0 if ($^{'TAINT'})
8569 0 0 $^{'TAINT'} < 0 ? :
8572 0 0 if ($PERL510)
8574 0 0 if (is_using_mro() and &mro::get_mro('main') eq 'c3')
8595 0 0 if (defined objsym(svref_2object(\*{'main::!';}))) { }
8597 0 0 unless ($include_package{'Errno'})
8615 0 0 if $verbose
8617 0 0 if $verbose
8623 0 0 if $ro_inc
8624 0 0 if $verbose
8636 0 0 if ($include_package{$p} and exists do { $p . '::' }->{'ISA'} and do { $p . '::' }->{'ISA'})
8639 0 0 if ($PERL510 and (is_using_mro() and &mro::get_mro($p) eq 'c3'))
8644 0 0 if @saved_isa and $verbose || $debug{'pkg'}
8652 0 0 if ($] < 5.017005) { }
0 0 elsif ($] < 5.019003) { }
0 0 elsif ($] < 5.022) { }
8670 0 0 if ($] < 5.017)
8672 0 0 if $verbose
8685 0 0 unless skip_pkg($p) or $all_bc_deps{$p} or $pack =~ /(autosplit\.ix|\.al)$/
8687 0 0 if ($debug{'pkg'} and $verbose)
8692 0 0 unless skip_pkg($pack)
8695 0 0 if $debug{'pkg'}
8700 0 0 if $verbose
8701 0 0 if $verbose
8703 0 0 if $PERL512
8706 0 0 unless $PERL56
8708 0 0 $verbose ? :
8721 0 0 if not $symbol =~ /^[0-9A-Z_]+$/ or $symbol =~ /(?:^ISA$|^EXPORT|^DESTROY|^TIE|^VERSION|^AUTOLOAD|^BEGIN|^INIT|^__|^DELETE|^CLEAR|^STORE|^NEXTKEY|^FIRSTKEY|^FETCH|^EXISTS)/
8722 0 0 if ref $symtab->{$symbol}
8726 0 0 if ($@ =~ /vendor has not defined/)
8739 0 0 if ($optimize_ppaddr)
8743 0 0 unless $num >= 0
8755 0 0 unless ref $SIG{$k}
8757 0 0 if ref $cvref eq 'B::CV' and $cvref->FILE =~ m[B/C\.pm$]
8760 0 0 unless (@save_sig)
8761 0 0 if $verbose
8762 0 0 if $verbose
8765 0 0 if $verbose
8766 0 0 if $verbose
8784 0 0 if ($] < 5.015003) { }
0 0 elsif ($CPERL51) { }
8802 0 0 if $] < 5.015003
8812 0 0 if $verbose or $debug{'cv'}
8819 0 0 if $debug{'av'}
8826 0 0 if $debug{'av'}
8831 0 0 unless (defined $module)
8837 0 0 index($init_av, '(AV*)') >= 0 ? :
8840 0 0 index($end_av, '(AV*)') >= 0 ? :
8844 0 0 unless defined $module
8847 0 0 if $use_xsloader
8849 0 0 if $check
8850 0 0 if $verbose
8855 0 0 if $stashname =~ /^\s*$/
8866 0 0 if (defined $module) { }
8867 0 0 $module ? :
8871 0 0 if $verbose
8941 0 0 if ($PERL522)
8948 0 0 if ($PERL522)
8969 225 0 unless $include_package{$_}
8976 0 0 if defined &DB::DB
8984 0 0 if $] >= 5.013009
8985 0 0 if $] >= 5.013005
8986 0 0 if $^O ne 'MSWin32' or not $Config{'cc'} =~ /^cl/i
8987 0 0 if $] >= 5.017
8996 0 0 if ($option =~ /^-(.)(.*)/) { }
9004 0 0 if ($opt eq '-' and $arg eq '-')
9008 0 0 if ($opt eq 'w')
9011 0 0 if ($opt eq 'c') { }
0 0 elsif ($opt eq 'D') { }
0 0 elsif ($opt eq 'o') { }
0 0 elsif ($opt eq 's' and $arg eq 'taticxs') { }
0 0 elsif ($opt eq 'n') { }
0 0 elsif ($opt eq 'm') { }
0 0 elsif ($opt eq 'v') { }
0 0 elsif ($opt eq 'u') { }
0 0 elsif ($opt eq 'U') { }
0 0 elsif ($opt eq 'f') { }
0 0 elsif ($opt eq 'O') { }
0 0 elsif ($opt eq 'e') { }
0 0 elsif ($opt eq 'l') { }
9016 0 0 if ($arg eq 'full') { }
0 0 elsif ($arg eq 'ufull') { }
9025 0 0 if (exists $debug_map{$arg}) { }
0 0 elsif ($arg eq 'o') { }
0 0 elsif ($arg eq 'F') { }
0 0 elsif ($arg eq 'r') { }
9033 0 0 if $] > 5.008 and eval 'require B::Flags;'
9043 0 0 if $init
9054 0 0 if ($check) { }
9057 0 0 unless open STDOUT, '>', $arg
9061 0 0 unless $outfile
9078 0 0 if ($arg =~ /\.p[lm]$/) { }
9093 0 0 $no ? :
9094 0 0 if (exists $option_map{$arg}) { }
9102 0 0 if $arg eq ''
9106 0 0 if exists $optimization_map{$i}
9109 0 0 if $verbose
9118 0 0 if (not $B::C::Config::have_independent_comalloc) { }
0 0 elsif ($av_init2 and $av_init) { }
9119 0 0 if ($av_init2) { }
0 0 elsif ($av_init) { }
9128 0 0 if $] >= 5.008 and $] < 5.009004 || $MULTI
9129 0 0 if $] < 5.008 or $^O eq 'MSWin32'
9135 0 0 if (@options) { }