Searched refs:Config (Results 101 - 125 of 315) sorted by relevance

1234567891011>>

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/File/t/
H A D24_cache_loop.t6 use Config;
8 unless ($Config{d_alarm}) {
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/User/
H A Dgrent.t15 use Config;
16 $hasgr = 0 unless $Config{'i_grp'} eq 'define';
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Dlib.t10 use Config;
24 $Arch_Dir = join "/", @lib_dir, $Config{archname};
27 $Auto_Dir = File::Spec->catdir(@lib_dir, $Config{archname},'auto');
84 unlike( do { eval 'use lib $Config{installsitelib};'; $@ || '' },
85 qr/::Config is read-only/, 'lib handles readonly stuff' );
H A DFileHandle.t6 require Config; import Config;
7 if ($Config{'extensions'} !~ /\bIO\b/ && $^O ne 'VMS') {
80 $Config{d_fork} ne 'define') {
H A Dinteger.t11 use Config;
41 my $ivsize = $Config{ivsize};
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/POSIX/t/
H A Dposix.t6 require Config; import Config;
7 if ($^O ne 'VMS' and $Config{'extensions'} !~ /\bPOSIX\b/) {
84 my $todo = $^O eq 'netbsd' && $Config{osvers}=~/^1\.6/;
85 my $why_todo = "# TODO $^O $Config{osvers} seems to loose blocked signals";
95 || ($^O eq 'darwin' && $Config{osvers} lt '6.6');
142 skip("strtod() not present", 1) unless $Config{d_strtod};
144 $lc = &POSIX::setlocale(&POSIX::LC_NUMERIC, 'C') if $Config{d_setlocale};
150 &POSIX::setlocale(&POSIX::LC_NUMERIC, $lc) if $Config{d_setlocale};
154 skip("strtol() not present", 2) unless $Config{d_strto
[all...]
H A Dis.t6 require Config; import Config;
7 if ($^O ne 'VMS' and $Config{'extensions'} !~ /\bPOSIX\b/) {
18 setlocale(LC_ALL, 'C') if $Config{d_setlocale};
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/t/
H A Dinterwork56.t22 require Config; import Config;
23 if ($ENV{PERL_CORE} and $Config{'extensions'} !~ /\bStorable\b/) {
27 unless ($Config{ivsize} and $Config{ivsize} > $Config{longsize}) {
59 is ($header->{byteorder}, $Config{byteorder},
60 "header's byteorder and Config.pm's should agree");
67 my $kingdom = $Config{byteorder} =~ /23/ ? "Lillput" : "Belfuscu";
77 # byteorder '$Config{byteorde
[all...]
H A Dmalice.t24 require Config; import Config;
25 if ($ENV{PERL_CORE} and $Config{'extensions'} !~ /\bStorable\b/) {
35 $byteorder = $Config{byteorder};
88 is ($header->{intsize}, $Config{intsize}, "int size");
89 is ($header->{longsize}, $Config{longsize}, "long size");
91 skip ("No \$Config{prtsize} on this perl version ($])", 1)
92 unless defined $Config{ptrsize};
93 is ($header->{ptrsize}, $Config{ptrsize}, "long size");
95 is ($header->{nvsize}, $Config{nvsiz
[all...]
H A Ddclone.t16 require Config; import Config;
17 if ($ENV{PERL_CORE} and $Config{'extensions'} !~ /\bStorable\b/) {
H A Dforgive.t19 require Config; import Config;
20 if ($ENV{PERL_CORE} and $Config{'extensions'} !~ /\bStorable\b/) {
H A Drestrict.t13 require Config;
14 if ($Config::Config{'extensions'} !~ /\bStorable\b/) {
H A Dretrieve.t16 require Config; import Config;
17 if ($ENV{PERL_CORE} and $Config{'extensions'} !~ /\bStorable\b/) {
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/uni/
H A Dchomp.t8 require Config; import Config;
9 if ($Config{'extensions'} !~ /\bEncode\b/) {
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Socket/t/
H A DSocket.t6 require Config; import Config;
7 if ($Config{'extensions'} !~ /\bSocket\b/ &&
8 !(($^O eq 'VMS') && $Config{d_socket})) {
12 $has_alarm = $Config{d_alarm};
29 my $host = $^O eq 'MacOS' || ($^O eq 'irix' && $Config{osvers} == 5) ?
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dconfigpm52 $Config_PM = $ARGV[0] || "xlib/$Opts{cross}/Config.pm";
55 $Config_PM = $ARGV[0] || 'lib/Config.pm';
67 package Config;
68 @EXPORT = qw(%%Config);
78 my @funcs = grep $_ ne '%%Config', @_;
88 *{"$callpkg\::Config"} = \%%Config if $export_Config;
110 # now so that I can expand $Config{ivsize} and $Config{ivtype}
153 # So we can say "if $Config{'fo
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/I18N/Langinfo/t/
H A DLanginfo.t6 require Config; import Config;
7 if ($Config{'extensions'} !~ m!\bI18N/Langinfo\b! ||
8 $Config{'extensions'} !~ m!\bPOSIX\b!)
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Safe/t/
H A Dsafe2.t4 require Config; import Config;
5 if ($Config{'extensions'} !~ /\bOpcode\b/ && $Config{'osname'} ne 'VMS') {
66 $cpt->share('$"') unless $Config{use5005threads};
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CGI/t/
H A Dutil.t9 use Config;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Net/t/
H A Drequire.t18 eval { require Net::Config; } || print "not "; print "ok ",$i++,"\n";
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IO/t/
H A Dio_tell.t14 use Config;
18 if ($Config{'extensions'} !~ /\bIO\b/ && $^O ne 'VMS') {
H A Dio_udp.t10 use Config;
16 if ($Config{'extensions'} !~ /\bSocket\b/) {
19 elsif ($Config{'extensions'} !~ /\bIO\b/) {
25 undef $reason if $^O eq 'VMS' and $Config{d_socket};
H A Dio_pipe.t10 use Config;
15 if (! $Config{'d_fork'}) {
18 elsif ($Config{'extensions'} !~ /\bIO\b/) {
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Data/Dumper/t/
H A Dpair.t10 require Config; import Config;
12 if ($Config{'extensions'} !~ /\bData\/Dumper\b/) {
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/io/
H A Dpipe.t6 require Config; import Config;
9 if (!$Config{'d_fork'}) {
54 skip "fork required", 2 unless $Config{d_fork};
117 if $Config{d_sfio} || $^O eq 'machten' || $^O eq 'beos' ||

Completed in 80 milliseconds

1234567891011>>