Searched refs:callpack (Results 1 - 8 of 8) sorted by relevance
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Sys/Syslog/t/ |
H A D | constants.t | 14 my $callpack = my $testpack = 'Sys::Syslog'; 15 eval "use $callpack"; 17 eval "${callpack}::This()"; 20 eval "${callpack}::NOSUCHNAME()"; 29 my $v = eval "${callpack}::$name()";
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ |
H A D | subs.pm | 32 my $callpack = caller; 36 *{"${callpack}::$sym"} = \&{"${callpack}::$sym"};
|
H A D | vars.pm | 11 my $callpack = caller; 28 $sym = "${callpack}::$sym" unless $sym =~ /::/;
|
H A D | Env.pm | 77 my ($callpack) = caller(0); 84 eval "package $callpack; use vars qw(" . join(' ', @vars) . ")"; 89 tie ${"${callpack}::$name"}, Env, $name; 92 tie @{"${callpack}::$name"}, Env::Array::VMS, $name; 94 tie @{"${callpack}::$name"}, Env::Array, $name;
|
H A D | Shell.pm | 16 my ($callpack, $callfile, $callline) = caller; 25 *{"${callpack}::$sym"} = \&{"Shell::$sym"};
|
H A D | SelfLoader.pm | 53 my($self, $callpack, $endlines) = @_; 54 my $fh = \*{"${callpack}::DATA"}; 55 my $currpack = $callpack; 58 print STDERR "SelfLoader::load_stubs($callpack)\n" if $DEBUG; 59 croak("$callpack doesn't contain an __DATA__ token")
|
H A D | CGI.pm | 298 my ($callpack, $callfile, $callline) = caller; 312 *{"${callpack}::$sym"} = \&{"$def\:\:$sym"};
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CGI/ |
H A D | Pretty.pm | 193 my ($callpack, $callfile, $callline) = caller; 207 *{"${callpack}::$sym"} = \&{"$def\:\:$sym"};
|
Completed in 66 milliseconds