| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/ |
| bytes_heavy.pl | 5 return CORE::length($_[0]);
11 @_ == 2 ? CORE::substr($_[0], $_[1]) :
12 @_ == 3 ? CORE::substr($_[0], $_[1], $_[2]) :
13 CORE::substr($_[0], $_[1], $_[2], $_[3]) ;
18 return CORE::ord($_[0]);
23 return CORE::chr($_[0]);
29 @_ == 2 ? CORE::index($_[0], $_[1]) :
30 CORE::index($_[0], $_[1], $_[2]) ;
36 @_ == 2 ? CORE::rindex($_[0], $_[1]) :
37 CORE::rindex($_[0], $_[1], $_[2])
[all...] |
| FileHandle.t | 39 CORE::read($fh, $buf,1);
|
| Cwd.pm | 264 CORE::chdir('..') || return undef;
286 && CORE::chdir($1) or return undef;
335 return 0 unless CORE::chdir $newdir;
437 if (!CORE::chdir($path)) {
441 if (! ((-d $cwd) && (CORE::chdir($cwd)))) {
546 # We assume that &_NT_cwd is defined as an XSUB or in the core.
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/ |
| override.t | 12 # This file tries to test builtin override using CORE::GLOBAL
21 BEGIN { *CORE::GLOBAL::time = sub () { $t; } }
29 BEGIN { *CORE::GLOBAL::require = sub { $r = shift; 1; } }
55 # localizing *CORE::GLOBAL::foo should revert to finding CORE::foo
57 local(*CORE::GLOBAL::require);
68 BEGIN { *CORE::GLOBAL::readline = sub (;*) { ++$r }; }
87 BEGIN { *OverridenWarn::warn = sub { CORE::warn "@_ overriden"; }; }
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/POSIX/ |
| POSIX.pm | 99 CORE::closedir($_[0]);
105 CORE::opendir($dirhandle, $_[0])
112 CORE::readdir($_[0]);
117 CORE::rewinddir($_[0]);
132 CORE::fcntl($_[0], $_[1], $_[2]);
137 CORE::getgrgid($_[0]);
142 CORE::getgrnam($_[0]);
147 CORE::atan2($_[0], $_[1]);
152 CORE::cos($_[0]);
157 CORE::exp($_[0])
[all...] |
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/User/ |
| grent.pm | 34 sub getgrent ( ) { populate(CORE::getgrent()) }
35 sub getgrnam ($) { populate(CORE::getgrnam(shift)) }
36 sub getgrgid ($) { populate(CORE::getgrgid(shift)) }
64 This module's default exports override the core getgrent(), getgruid(),
73 overrides your core functions.) Access these fields as variables named
82 To access this functionality without the core overrides,
86 via the C<CORE::> pseudo-package.
|
| pwent.pm | 137 # since the underlying core call already took exception to your
172 sub getpwent ( ) { _populate(CORE::getpwent()) }
173 sub getpwnam ($) { _populate(CORE::getpwnam(shift)) }
174 sub getpwuid ($) { _populate(CORE::getpwuid(shift)) }
217 This module's default exports override the core getpwent(), getpwuid(),
228 that this still overrides your core functions.) Access these fields
236 To access this functionality without the core overrides, pass the
239 available via the C<CORE::> pseudo-package.
|
| /onnv/onnv-gate/usr/src/pkgdefs/SUNWperl584usr/ |
| prototype_i386 | 138 d none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE 0755 root bin
139 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/av.h 0444 root bin
140 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/cc_runtime.h 0444 root bin
141 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/config.h 0444 root bin
142 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/cop.h 0444 root bin
143 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/cv.h 0444 root bin
144 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/dosish.h 0444 root bin
145 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/embed.h 0444 root bin
146 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/embedvar.h 0444 root bin
147 f none usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE/EXTERN.h 0444 root bi
[all...] |
| prototype_sparc | 138 d none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE 0755 root bin
139 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/av.h 0444 root bin
140 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/cc_runtime.h 0444 root bin
141 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/config.h 0444 root bin
142 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/cop.h 0444 root bin
143 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/cv.h 0444 root bin
144 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/dosish.h 0444 root bin
145 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/embed.h 0444 root bin
146 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/embedvar.h 0444 root bin
147 f none usr/perl5/5.8.4/lib/sun4-solaris-64int/CORE/EXTERN.h 0444 root bi
[all...] |
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Net/ |
| protoent.pm | 34 sub getprotoent ( ) { populate(CORE::getprotoent()) }
35 sub getprotobyname ($) { populate(CORE::getprotobyname(shift)) }
36 sub getprotobynumber ($) { populate(CORE::getprotobynumber(shift)) }
64 This module's default exports override the core getprotoent(),
74 overrides your core functions.) Access these fields as variables named
83 To access this functionality without the core overrides,
87 via the C<CORE::> pseudo-package.
|
| servent.pm | 36 sub getservent ( ) { populate(CORE::getservent()) }
37 sub getservbyname ($;$) { populate(CORE::getservbyname(shift,shift||'tcp')) }
38 sub getservbyport ($;$) { populate(CORE::getservbyport(shift,shift||'tcp')) }
66 This module's default exports override the core getservent(),
76 overrides your core functions.) Access these fields as variables named
85 To access this functionality without the core overrides,
89 via the C<CORE::> pseudo-package.
|
| hostent.pm | 45 sub gethostbyname ($) { populate(CORE::gethostbyname(shift)) }
52 populate(CORE::gethostbyaddr($addr, $addrtype))
77 This module's default exports override the core gethostbyname() and
88 overrides your core functions.) Access these fields as variables named
98 To access this functionality without the core overrides,
102 via the C<CORE::> pseudo-package.
|
| netent.pm | 39 sub getnetbyname ($) { populate(CORE::getnetbyname(shift)) }
46 populate(CORE::getnetbyaddr($net, $addrtype))
82 This module's default exports override the core getnetbyname() and
91 overrides your core functions.) Access these fields as variables named
101 To access this functionality without the core overrides,
105 via the C<CORE::> pseudo-package.
109 The getnet() functions do this in the Perl core:
113 The gethost() functions do this in the Perl core:
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/File/Glob/t/ |
| global.t | 23 *CORE::GLOBAL::glob = sub { "Just another Perl hacker," };
30 the core glob operator.
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Net/t/ |
| netrc.t | 25 local (*CORE::GLOBAL::getpwuid, *CORE::GLOBAL::stat);
27 *CORE::GLOBAL::getpwuid = sub ($) {
33 *CORE::GLOBAL::stat = sub (*) {
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Time/ |
| gmtime.pm | 33 sub gmtime (;$) { populate CORE::gmtime(@_ ? shift : time)}
34 sub gmctime (;$) { scalar CORE::gmtime(@_ ? shift : time)}
62 This module's default exports override the core gmtime() function,
70 still overrides your core functions.) Access these fields as variables
75 scalar sense of the original CORE::gmtime() function.
77 To access this functionality without the core overrides,
81 via the C<CORE::> pseudo-package.
|
| localtime.pm | 33 sub localtime (;$) { populate CORE::localtime(@_ ? shift : time)}
34 sub ctime (;$) { scalar CORE::localtime(@_ ? shift : time) }
57 This module's default exports override the core localtime() function,
65 overrides your core functions.) Access these fields as
71 scalar sense of the original CORE::localtime() function.
73 To access this functionality without the core overrides,
77 via the C<CORE::> pseudo-package.
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Math/ |
| Complex.pm | 20 my $t = CORE::exp 30;
21 $Inf = CORE::exp $t;
253 sub pi () { 4 * CORE::atan2(1, 1) }
282 sub uplog10 () { 1 / CORE::log(10) }
327 return $self->{'cartesian'} = [$r * CORE::cos($t), $r * CORE::sin($t)];
341 return $self->{'polar'} = [CORE::sqrt($x*$x + $y*$y),
342 CORE::atan2($y, $x)];
574 return CORE::abs($z);
632 return $re < 0 ? cplx(0, CORE::sqrt(-$re)) : CORE::sqrt($re
[all...] |
| /onnv/onnv-gate/usr/src/lib/fm/topo/libtopo/common/ |
| topo_hc.h | 45 #define CORE "core"
63 #define MICROCORE "micro-core"
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/File/ |
| stat.pm | 45 sub lstat ($) { populate(CORE::lstat(shift)) }
49 my $st = populate(CORE::stat $arg);
59 return populate(CORE::stat $fh);
85 This module's default exports override the core stat()
112 To access this functionality without the core overrides,
116 via the C<CORE::> pseudo-package.
128 and undocumented populate() function with CORE::stat():
130 my $stat_obj = File::stat::populate(CORE::stat(_));
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/ |
| CalcEmu.pm | 65 my $diff = CORE::length($bx) - CORE::length($by);
152 my $diff = CORE::length($bx) - CORE::length($by);
238 my $diff = CORE::length($bx) - CORE::length($by);
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/ |
| Command.t | 32 *CORE::GLOBAL::exit = ''; # quiet 'only once' warning.
33 *CORE::GLOBAL::exit = sub { return @_ };
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ |
| installperl | 227 `./$^X -pibak -e 's{$pwd\/libperl.x}{$archlibexp/CORE/libperl.x}' lib/Config.pm`;
422 mkpath("$installarchlib/CORE", $verbose, 0777);
424 if ($Is_VMS) { # We did core file selection during build
425 my $coredir = "lib/$Config{archname}/$ver/CORE";
437 mkpath("$installarchlib/CORE/mpeix", $verbose, 0777);
446 if (copy_if_diff($file,"$installarchlib/CORE/$file")) {
448 strip("-S", "$installarchlib/CORE/$file") if $^O =~ /^(rhapsody|darwin)$/;
449 chmod(0555, "$installarchlib/CORE/$file");
451 chmod(0444, "$installarchlib/CORE/$file");
533 eval { CORE::link $instperl, $usrbinperl } ) |
[all...] |
| /onnv/onnv-gate/usr/src/lib/fm/topo/modules/sun4v/sun4vpi/ |
| pi_cpu.c | 72 * If the hc_name is "chip" or "core", set asru to resource,
75 if (strcmp(hc_name, CHIP) == 0 || strcmp(hc_name, CORE) == 0) {
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/POSIX/t/ |
| posix.t | 52 CORE::open($reader = \*READER, "<&=".$fds[0]);
53 CORE::open($writer = \*WRITER, ">&=".$fds[1]);
216 is (eval "kill 0", 0, "check we have CORE::kill")
|
