Searched refs:callpkg (Results 1 - 12 of 12) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Exporter/
H A DHeavy.pm61 my($pkg, $callpkg, @imports) = @_;
190 warn "Importing into $callpkg from $pkg: ",
195 (*{"${callpkg}::$sym"} = \&{"${pkg}::$sym"}, next)
198 *{"${callpkg}::$sym"} =
213 my $callpkg = caller($level);
214 $pkg->export($callpkg, @_);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A DAutoLoader.pm121 my $callpkg = caller;
129 *{ $callpkg . '::AUTOLOAD' } = \&AUTOLOAD
145 (my $calldir = $callpkg) =~ s#::#/#g;
171 my $callpkg = caller;
174 my $symname = $callpkg . '::AUTOLOAD';
H A DFileHandle.pm71 my $callpkg = caller;
73 Exporter::export($pkg, $callpkg, @_);
81 Exporter::export('Fcntl', $callpkg);
H A DExporter.pm31 my $callpkg = caller($ExportLevel);
34 *{$callpkg."::import"} = \&import;
40 return export $pkg, $callpkg, @_
61 return export $pkg, $callpkg, ($args ? @_ : ()) if $heavy;
65 *{"$callpkg\::$_"} = \&{"$pkg\::$_"} foreach @_;
H A Dautouse.pm32 my $callpkg = caller(0);
33 print "autouse called from $callpkg\n" if $autouse::DEBUG;
44 $closure_import_func = "${callpkg}::$func";
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dconfigpm81 my $callpkg = caller(0);
85 *{$callpkg.'::'.$func} = \&{$func};
88 *{"$callpkg\::Config"} = \%%Config if $export_Config;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IO/lib/IO/
H A DSocket.pm35 my $callpkg = caller;
36 Exporter::export 'Socket', $callpkg, @_;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/
H A DDosGlob.pm412 my $callpkg = ($sym =~ s/^GLOBAL_//s ? 'CORE::GLOBAL' : caller(0));
413 *{$callpkg.'::'.$sym} = \&{$pkg.'::'.$sym} if $sym eq 'glob';
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/lib/Encode/
H A DGuess.pm24 my $callpkg = caller;
27 *{"$callpkg\::$item"} = \&{"$item"};
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/PerlGcc/config/5.8.4/5.11/i386/
H A DConfig.pm18 my $callpkg = caller(0);
22 *{$callpkg.'::'.$func} = \&{$func};
25 *{"$callpkg\::Config"} = \%Config if $export_Config;
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/PerlGcc/config/5.8.4/5.11/sparc/
H A DConfig.pm18 my $callpkg = caller(0);
22 *{$callpkg.'::'.$func} = \&{$func};
25 *{"$callpkg\::Config"} = \%Config if $export_Config;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Test/
H A DMore.pm44 my $callpkg = caller($level);
45 $pkg->export($callpkg, @_);

Completed in 34 milliseconds