Lines Matching refs:Cache
10 my %Cache; # private cache for all SelfLoader's client packages
24 my $SL_code = $Cache{$AUTOLOAD};
30 SelfLoader->_load_stubs($1) unless exists $Cache{"${1}::<DATA"};
31 $SL_code = $Cache{$AUTOLOAD};
45 delete $Cache{$AUTOLOAD};
61 $Cache{"${currpack}::<DATA"} = 1; # indicate package is cached
88 $Cache{"${currpack}::<DATA"} = 1; # indicate package is cached
119 if exists $Cache{$fullname};
120 $Cache{$fullname} = join('', "package $pack; ",@$lines);
121 print STDERR "SelfLoader cached $fullname: $Cache{$fullname}" if $DEBUG;