# This file was created by configpm when Perl was built. Any changes
# made to this file will be lost the next time perl is built.
# use warnings; Pulls in Carp
@Config::EXPORT
= qw(%Config);
@Config::EXPORT_OK = qw(myconfig config_sh config_vars config_re);
# Need to stub all the functions to make code such as print Config::config_sh
my %Export_Cache = map {($_ => 1)} (@Config::EXPORT
, @Config::EXPORT_OK
);
# Define our own import method to avoid pulling in the full Exporter:
@_ = @Config::EXPORT
unless @_;
my @funcs = grep $_ ne '%Config', @_;
my $export_Config = @funcs < @_ ?
1 : 0;
foreach my $func (@funcs) {
die sprintf qq{"%s" is
not exported by the
%s module
\n},
$func, __PACKAGE__
unless $Export_Cache{$func};
*{$callpkg.'::'.$func} = \
&{$func};
*{"$callpkg\::Config"} = \
%Config if $export_Config;
die "Perl lib version (v5.8.8) doesn't match executable version ($])"
or die "Perl lib version (v5.8.8) doesn't match executable version (" .
sprintf("v%vd",$^V
) . ")";
# check for cached value (which may be undef so we use exists not defined)
return $self->{$key} if exists $self->{$key};
return $self->fetch_string($key);
require 'Config_heavy.pl';
goto \
&launcher
unless $Config::AUTOLOAD
=~ /launcher$/;
die "&Config::AUTOLOAD failed on $Config::AUTOLOAD";
# tie returns the object, so the value returned to require will be true.
archlibexp
=> '/import/archperf/ws/devtools/4/v9/lib/perl5/5.8.8/sun4-solaris-64-ld',
archname
=> 'sun4-solaris-64-ld',
ldlibpthname
=> 'LD_LIBRARY_PATH',
libpth
=> '/import/datools/vendor/sun/studio11/SUNWspro/prod/lib/v9 /lib/sparcv9 /usr/lib/sparcv9 /usr/ccs/lib/sparcv9 /usr/lib /usr/ccs/lib',
privlibexp
=> '/import/archperf/ws/devtools/4/v9/lib/perl5/5.8.8',
scriptdir
=> '/import/archperf/ws/devtools/4/v9/bin',
sitearchexp
=> '/import/archperf/ws/devtools/4/v9/lib/perl5/site_perl/5.8.8/sun4-solaris-64-ld',
sitelibexp
=> '/import/archperf/ws/devtools/4/v9/lib/perl5/site_perl/5.8.8',
usevendorprefix
=> undef,