Update to Perl 5.005_01.

This commit is contained in:
Mark Murray 1998-08-06 10:43:22 +00:00
parent 4bcf821a29
commit 0d626d564a
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=12295
49 changed files with 7301 additions and 4410 deletions

View File

@ -3,11 +3,11 @@
# Date created: 16 April 1995
# Whom: markm
#
# $Id: Makefile,v 1.22 1997/11/12 10:24:10 markm Exp $
# $Id: Makefile,v 1.23 1998/02/15 23:03:58 steve Exp $
#
DISTNAME= perl5.004_04
PKGNAME= perl-5.00404
DISTNAME= perl5.005_01
PKGNAME= perl-5.00501
CATEGORIES= lang devel perl5
MASTER_SITES= ftp://ftp.digital.com/pub/plan/perl/CPAN/src/5.0/ \
ftp://ftp.cdrom.com/pub/perl/CPAN/src/5.0/
@ -18,46 +18,61 @@ HAS_CONFIGURE= yes
CONFIGURE_SCRIPT= Configure
CONFIGURE_ARGS= -sde -Dprefix=${PREFIX}
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perlapio.1 perlbook.1 perlbot.1 \
perlbug.1 perlcall.1 perldata.1 perldebug.1 perldelta.1 perldiag.1 \
perldoc.1 perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 perlfaq8.1 \
perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllocale.1 \
perllol.1 perlmod.1 perlmodlib.1 perlobj.1 perlop.1 perlpod.1 \
perlre.1 perlref.1 perlrun.1 perlsec.1 perlstyle.1 perlsub.1 \
perlsyn.1 perltie.1 perltoc.1 perltoot.1 perltrap.1 perlvar.1 \
perlxs.1 perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 s2p.1 \
splain.1 xsubpp.1
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perl5004delta.1 \
perlapio.1 perlbook.1 perlbot.1 perlbug.1 perlcall.1 \
perldata.1 perldebug.1 perldelta.1 perldiag.1 perldoc.1 \
perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 \
perlfaq8.1 perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 \
perlhist.1 perlipc.1 perllocale.1 perllol.1 perlmod.1 \
perlmodinstall.1 perlmodlib.1 perlobj.1 perlop.1 \
perlpod.1 perlport.1 perlre.1 perlref.1 perlrun.1 \
perlsec.1 perlstyle.1 perlsub.1 perlsyn.1 perltie.1 \
perltoc.1 perltoot.1 perltrap.1 perlvar.1 perlxs.1 \
perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 \
s2p.1 splain.1 xsubpp.1
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 Benchmark.3 Bundle::CPAN.3 \
CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Fast.3 CGI::Push.3 \
CGI::Switch.3 CPAN.3 CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 \
Class::Struct.3 Config.3 Cwd.3 DB_File.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Exporter.3 \
ExtUtils::Command.3 ExtUtils::Embed.3 ExtUtils::Install.3 \
ExtUtils::Liblist.3 ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 \
ExtUtils::MM_VMS.3 ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 \
ExtUtils::Manifest.3 ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::testlib.3 Fcntl.3 File::Basename.3 \
File::CheckTree.3 File::Compare.3 File::Copy.3 File::DosGlob.3 \
File::Find.3 File::Path.3 File::stat.3 FileCache.3 FileHandle.3 \
FindBin.3 Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 IO::Select.3 \
IO::Socket.3 IPC::Open2.3 IPC::Open3.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 Net::Ping.3 \
Net::hostent.3 Net::netent.3 Net::protoent.3 Net::servent.3 Opcode.3 \
POSIX.3 Pod::Html.3 Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 B.3 B::Asmdata.3 \
B::Assembler.3 B::Bblock.3 B::Bytecode.3 B::C.3 B::CC.3 \
B::Debug.3 B::Deparse.3 B::Disassembler.3 B::Lint.3 \
B::Showlex.3 B::Stackobj.3 B::Terse.3 B::Xref.3 \
Benchmark.3 CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Cookie.3 \
CGI::Fast.3 CGI::Push.3 CGI::Switch.3 CPAN.3 \
CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 Class::Struct.3 \
Config.3 Cwd.3 DB_File.3 Data::Dumper.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Errno.3 \
Exporter.3 ExtUtils::Command.3 ExtUtils::Embed.3 \
ExtUtils::Install.3 ExtUtils::Installed.3 ExtUtils::Liblist.3 \
ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 ExtUtils::MM_VMS.3 \
ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 ExtUtils::Manifest.3 \
ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::Packlist.3 ExtUtils::testlib.3 \
Fatal.3 Fcntl.3 File::Basename.3 File::CheckTree.3 \
File::Compare.3 File::Copy.3 File::DosGlob.3 File::Find.3 \
File::Path.3 File::Spec.3 File::Spec::Mac.3 File::Spec::OS2.3 \
File::Spec::Unix.3 File::Spec::VMS.3 File::Spec::Win32.3 \
File::stat.3 FileCache.3 FileHandle.3 FindBin.3 \
Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 \
IO::Select.3 IO::Socket.3 IPC::Msg.3 IPC::Open2.3 \
IPC::Open3.3 IPC::Semaphore.3 IPC::SysV.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 \
Net::Ping.3 Net::hostent.3 Net::netent.3 Net::protoent.3 \
Net::servent.3 O.3 Opcode.3 POSIX.3 Pod::Html.3 \
Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
SelectSaver.3 SelfLoader.3 Shell.3 Socket.3 Symbol.3 \
Sys::Hostname.3 Sys::Syslog.3 Term::Cap.3 Term::Complete.3 \
Term::ReadLine.3 Test::Harness.3 Text::Abbrev.3 Text::ParseWords.3 \
Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 Tie::Hash.3 \
Tie::RefHash.3 Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 \
Time::gmtime.3 Time::localtime.3 Time::tm.3 UNIVERSAL.3 \
User::grent.3 User::pwent.3 autouse.3 base.3 blib.3 constant.3 \
diagnostics.3 integer.3 less.3 lib.3 locale.3 ops.3 overload.3 \
sigtrap.3 strict.3 subs.3 vars.3
Term::ReadLine.3 Test.3 Test::Harness.3 Text::Abbrev.3 \
Text::ParseWords.3 Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 \
Tie::Array.3 Tie::Handle.3 Tie::Hash.3 Tie::RefHash.3 \
Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 Time::gmtime.3 \
Time::localtime.3 Time::tm.3 UNIVERSAL.3 User::grent.3 \
User::pwent.3 attrs.3 autouse.3 base.3 blib.3 \
constant.3 diagnostics.3 fields.3 integer.3 less.3 \
lib.3 locale.3 ops.3 overload.3 re.3 sigtrap.3 \
strict.3 subs.3 vars.3
MAN3PREFIX= ${PREFIX}/lib/perl5
MAN3PREFIX= ${PREFIX}/lib/perl5/5.00501/
test:
@(cd ${WRKSRC}; make test)

View File

@ -1 +1 @@
MD5 (perl5.004_04.tar.gz) = 2618029201ad19cfb9a7d02a498eb1f4
MD5 (perl5.005_01.tar.gz) = 984d8d3bd86662461692a4caef114428

View File

@ -1,29 +1,11 @@
--- installperl.ORIG Mon May 12 05:22:27 1997
+++ installperl Fri May 23 11:40:27 1997
@@ -93,7 +93,7 @@
safe_unlink("$installbin/sperl$ver$exe_ext");
if ($d_dosuid) {
copy("suidperl$exe_ext", "$installbin/sperl$ver$exe_ext");
- chmod(04711, "$installbin/sperl$ver$exe_ext");
+ chmod(04111, "$installbin/sperl$ver$exe_ext");
}
# Install library files.
@@ -156,11 +156,12 @@
--- installperl.ORIG Thu Jul 30 15:58:50 1998
+++ installperl Thu Jul 30 16:02:16 1998
@@ -269,7 +269,7 @@
(-l $usrbinperl) &&
((readlink $usrbinperl) eq $expinstperl));
}
- if ((! $mainperl_is_instperl) &&
- (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
- "Do you wish to have $usrbinperl be the same as\n" .
- "$expinstperl? [y] ")))
- {
+# if ((! $mainperl_is_instperl) &&
+# (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
+# "Do you wish to have $usrbinperl be the same as\n" .
+# "$expinstperl? [y] ")))
+# {
+ if ('') { # MarkM - May 1997. Take the NO route always.
unlink($usrbinperl);
eval { CORE::link $instperl, $usrbinperl } ||
eval { symlink $expinstperl, $usrbinperl } ||
+ if ('' && (! $mainperl_is_instperl) &&
(yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
"Do you wish to have $usrbinperl be the same as\n" .
"$expinstperl? [y] ")))

View File

@ -1,6 +1,6 @@
--- hints/freebsd.sh.orig Wed Apr 23 16:01:37 1997
+++ hints/freebsd.sh Tue Jun 3 14:29:50 1997
@@ -63,6 +63,7 @@
--- hints/freebsd.sh.ORIG Fri Jul 24 06:00:19 1998
+++ hints/freebsd.sh Thu Jul 30 16:04:24 1998
@@ -68,6 +68,7 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'
@ -8,7 +8,7 @@
test -r ./broken-db.msg && . ./broken-db.msg
;;
#
@@ -76,12 +77,18 @@
@@ -81,12 +82,18 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'

View File

@ -1,6 +1,6 @@
--- perl.h.ORIG Mon Apr 28 17:36:10 1997
+++ perl.h Fri May 23 11:56:49 1997
@@ -223,6 +223,15 @@
--- perl.h.ORIG Thu Jul 30 17:04:42 1998
+++ perl.h Thu Jul 30 17:06:34 1998
@@ -361,6 +361,15 @@
# include <sys/param.h>
#endif
@ -16,26 +16,26 @@
/* Use all the "standard" definitions? */
#if defined(STANDARD_C) && defined(I_STDLIB)
--- perl5.004/perl.c.ORIG Fri May 16 00:14:03 1997
+++ perl.c Fri May 23 11:56:49 1997
@@ -1917,6 +1917,20 @@
--- perl.c.ORIG Thu Jul 30 17:04:23 1998
+++ perl.c Thu Jul 30 17:04:57 1998
@@ -2124,6 +2124,20 @@
croak("Can't swap uid and euid"); /* really paranoid */
if (Stat(SvPVX(GvSV(curcop->cop_filegv)),&tmpstatbuf) < 0)
if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0)
croak("Permission denied"); /* testing full pathname here */
+#if (defined(BSD) && (BSD >= 199306))
+#ifdef IAMSUID
+ {
+ struct statfs stfs;
+ {
+ struct statfs stfs;
+
+ if (fstatfs(fileno(rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",origfilename);
+ if (fstatfs(fileno(PL_rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",PL_origfilename);
+
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+#endif /* IAMSUID */
+#endif /* BSD */
+
if (tmpstatbuf.st_dev != statbuf.st_dev ||
tmpstatbuf.st_ino != statbuf.st_ino) {
(void)PerlIO_close(rsfp);
if (tmpstatbuf.st_dev != PL_statbuf.st_dev ||
tmpstatbuf.st_ino != PL_statbuf.st_ino) {
(void)PerlIO_close(PL_rsfp);

View File

@ -1,6 +1,6 @@
--- makedepend.SH.orig Mon Sep 8 21:27:36 1997
+++ makedepend.SH Mon Sep 8 21:29:04 1997
@@ -60,6 +60,7 @@
--- makedepend.SH.ORIG Fri Jul 24 06:00:58 1998
+++ makedepend.SH Thu Jul 30 17:08:37 1998
@@ -67,6 +67,7 @@
# to be out of date. I don't know if OS/2 has touch, so do this:
case "$osname" in
os2) ;;

File diff suppressed because it is too large Load Diff

View File

@ -3,11 +3,11 @@
# Date created: 16 April 1995
# Whom: markm
#
# $Id: Makefile,v 1.22 1997/11/12 10:24:10 markm Exp $
# $Id: Makefile,v 1.23 1998/02/15 23:03:58 steve Exp $
#
DISTNAME= perl5.004_04
PKGNAME= perl-5.00404
DISTNAME= perl5.005_01
PKGNAME= perl-5.00501
CATEGORIES= lang devel perl5
MASTER_SITES= ftp://ftp.digital.com/pub/plan/perl/CPAN/src/5.0/ \
ftp://ftp.cdrom.com/pub/perl/CPAN/src/5.0/
@ -18,46 +18,61 @@ HAS_CONFIGURE= yes
CONFIGURE_SCRIPT= Configure
CONFIGURE_ARGS= -sde -Dprefix=${PREFIX}
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perlapio.1 perlbook.1 perlbot.1 \
perlbug.1 perlcall.1 perldata.1 perldebug.1 perldelta.1 perldiag.1 \
perldoc.1 perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 perlfaq8.1 \
perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllocale.1 \
perllol.1 perlmod.1 perlmodlib.1 perlobj.1 perlop.1 perlpod.1 \
perlre.1 perlref.1 perlrun.1 perlsec.1 perlstyle.1 perlsub.1 \
perlsyn.1 perltie.1 perltoc.1 perltoot.1 perltrap.1 perlvar.1 \
perlxs.1 perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 s2p.1 \
splain.1 xsubpp.1
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perl5004delta.1 \
perlapio.1 perlbook.1 perlbot.1 perlbug.1 perlcall.1 \
perldata.1 perldebug.1 perldelta.1 perldiag.1 perldoc.1 \
perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 \
perlfaq8.1 perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 \
perlhist.1 perlipc.1 perllocale.1 perllol.1 perlmod.1 \
perlmodinstall.1 perlmodlib.1 perlobj.1 perlop.1 \
perlpod.1 perlport.1 perlre.1 perlref.1 perlrun.1 \
perlsec.1 perlstyle.1 perlsub.1 perlsyn.1 perltie.1 \
perltoc.1 perltoot.1 perltrap.1 perlvar.1 perlxs.1 \
perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 \
s2p.1 splain.1 xsubpp.1
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 Benchmark.3 Bundle::CPAN.3 \
CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Fast.3 CGI::Push.3 \
CGI::Switch.3 CPAN.3 CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 \
Class::Struct.3 Config.3 Cwd.3 DB_File.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Exporter.3 \
ExtUtils::Command.3 ExtUtils::Embed.3 ExtUtils::Install.3 \
ExtUtils::Liblist.3 ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 \
ExtUtils::MM_VMS.3 ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 \
ExtUtils::Manifest.3 ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::testlib.3 Fcntl.3 File::Basename.3 \
File::CheckTree.3 File::Compare.3 File::Copy.3 File::DosGlob.3 \
File::Find.3 File::Path.3 File::stat.3 FileCache.3 FileHandle.3 \
FindBin.3 Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 IO::Select.3 \
IO::Socket.3 IPC::Open2.3 IPC::Open3.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 Net::Ping.3 \
Net::hostent.3 Net::netent.3 Net::protoent.3 Net::servent.3 Opcode.3 \
POSIX.3 Pod::Html.3 Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 B.3 B::Asmdata.3 \
B::Assembler.3 B::Bblock.3 B::Bytecode.3 B::C.3 B::CC.3 \
B::Debug.3 B::Deparse.3 B::Disassembler.3 B::Lint.3 \
B::Showlex.3 B::Stackobj.3 B::Terse.3 B::Xref.3 \
Benchmark.3 CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Cookie.3 \
CGI::Fast.3 CGI::Push.3 CGI::Switch.3 CPAN.3 \
CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 Class::Struct.3 \
Config.3 Cwd.3 DB_File.3 Data::Dumper.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Errno.3 \
Exporter.3 ExtUtils::Command.3 ExtUtils::Embed.3 \
ExtUtils::Install.3 ExtUtils::Installed.3 ExtUtils::Liblist.3 \
ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 ExtUtils::MM_VMS.3 \
ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 ExtUtils::Manifest.3 \
ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::Packlist.3 ExtUtils::testlib.3 \
Fatal.3 Fcntl.3 File::Basename.3 File::CheckTree.3 \
File::Compare.3 File::Copy.3 File::DosGlob.3 File::Find.3 \
File::Path.3 File::Spec.3 File::Spec::Mac.3 File::Spec::OS2.3 \
File::Spec::Unix.3 File::Spec::VMS.3 File::Spec::Win32.3 \
File::stat.3 FileCache.3 FileHandle.3 FindBin.3 \
Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 \
IO::Select.3 IO::Socket.3 IPC::Msg.3 IPC::Open2.3 \
IPC::Open3.3 IPC::Semaphore.3 IPC::SysV.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 \
Net::Ping.3 Net::hostent.3 Net::netent.3 Net::protoent.3 \
Net::servent.3 O.3 Opcode.3 POSIX.3 Pod::Html.3 \
Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
SelectSaver.3 SelfLoader.3 Shell.3 Socket.3 Symbol.3 \
Sys::Hostname.3 Sys::Syslog.3 Term::Cap.3 Term::Complete.3 \
Term::ReadLine.3 Test::Harness.3 Text::Abbrev.3 Text::ParseWords.3 \
Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 Tie::Hash.3 \
Tie::RefHash.3 Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 \
Time::gmtime.3 Time::localtime.3 Time::tm.3 UNIVERSAL.3 \
User::grent.3 User::pwent.3 autouse.3 base.3 blib.3 constant.3 \
diagnostics.3 integer.3 less.3 lib.3 locale.3 ops.3 overload.3 \
sigtrap.3 strict.3 subs.3 vars.3
Term::ReadLine.3 Test.3 Test::Harness.3 Text::Abbrev.3 \
Text::ParseWords.3 Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 \
Tie::Array.3 Tie::Handle.3 Tie::Hash.3 Tie::RefHash.3 \
Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 Time::gmtime.3 \
Time::localtime.3 Time::tm.3 UNIVERSAL.3 User::grent.3 \
User::pwent.3 attrs.3 autouse.3 base.3 blib.3 \
constant.3 diagnostics.3 fields.3 integer.3 less.3 \
lib.3 locale.3 ops.3 overload.3 re.3 sigtrap.3 \
strict.3 subs.3 vars.3
MAN3PREFIX= ${PREFIX}/lib/perl5
MAN3PREFIX= ${PREFIX}/lib/perl5/5.00501/
test:
@(cd ${WRKSRC}; make test)

View File

@ -1 +1 @@
MD5 (perl5.004_04.tar.gz) = 2618029201ad19cfb9a7d02a498eb1f4
MD5 (perl5.005_01.tar.gz) = 984d8d3bd86662461692a4caef114428

View File

@ -1,29 +1,11 @@
--- installperl.ORIG Mon May 12 05:22:27 1997
+++ installperl Fri May 23 11:40:27 1997
@@ -93,7 +93,7 @@
safe_unlink("$installbin/sperl$ver$exe_ext");
if ($d_dosuid) {
copy("suidperl$exe_ext", "$installbin/sperl$ver$exe_ext");
- chmod(04711, "$installbin/sperl$ver$exe_ext");
+ chmod(04111, "$installbin/sperl$ver$exe_ext");
}
# Install library files.
@@ -156,11 +156,12 @@
--- installperl.ORIG Thu Jul 30 15:58:50 1998
+++ installperl Thu Jul 30 16:02:16 1998
@@ -269,7 +269,7 @@
(-l $usrbinperl) &&
((readlink $usrbinperl) eq $expinstperl));
}
- if ((! $mainperl_is_instperl) &&
- (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
- "Do you wish to have $usrbinperl be the same as\n" .
- "$expinstperl? [y] ")))
- {
+# if ((! $mainperl_is_instperl) &&
+# (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
+# "Do you wish to have $usrbinperl be the same as\n" .
+# "$expinstperl? [y] ")))
+# {
+ if ('') { # MarkM - May 1997. Take the NO route always.
unlink($usrbinperl);
eval { CORE::link $instperl, $usrbinperl } ||
eval { symlink $expinstperl, $usrbinperl } ||
+ if ('' && (! $mainperl_is_instperl) &&
(yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
"Do you wish to have $usrbinperl be the same as\n" .
"$expinstperl? [y] ")))

View File

@ -1,6 +1,6 @@
--- hints/freebsd.sh.orig Wed Apr 23 16:01:37 1997
+++ hints/freebsd.sh Tue Jun 3 14:29:50 1997
@@ -63,6 +63,7 @@
--- hints/freebsd.sh.ORIG Fri Jul 24 06:00:19 1998
+++ hints/freebsd.sh Thu Jul 30 16:04:24 1998
@@ -68,6 +68,7 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'
@ -8,7 +8,7 @@
test -r ./broken-db.msg && . ./broken-db.msg
;;
#
@@ -76,12 +77,18 @@
@@ -81,12 +82,18 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'

View File

@ -1,6 +1,6 @@
--- perl.h.ORIG Mon Apr 28 17:36:10 1997
+++ perl.h Fri May 23 11:56:49 1997
@@ -223,6 +223,15 @@
--- perl.h.ORIG Thu Jul 30 17:04:42 1998
+++ perl.h Thu Jul 30 17:06:34 1998
@@ -361,6 +361,15 @@
# include <sys/param.h>
#endif
@ -16,26 +16,26 @@
/* Use all the "standard" definitions? */
#if defined(STANDARD_C) && defined(I_STDLIB)
--- perl5.004/perl.c.ORIG Fri May 16 00:14:03 1997
+++ perl.c Fri May 23 11:56:49 1997
@@ -1917,6 +1917,20 @@
--- perl.c.ORIG Thu Jul 30 17:04:23 1998
+++ perl.c Thu Jul 30 17:04:57 1998
@@ -2124,6 +2124,20 @@
croak("Can't swap uid and euid"); /* really paranoid */
if (Stat(SvPVX(GvSV(curcop->cop_filegv)),&tmpstatbuf) < 0)
if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0)
croak("Permission denied"); /* testing full pathname here */
+#if (defined(BSD) && (BSD >= 199306))
+#ifdef IAMSUID
+ {
+ struct statfs stfs;
+ {
+ struct statfs stfs;
+
+ if (fstatfs(fileno(rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",origfilename);
+ if (fstatfs(fileno(PL_rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",PL_origfilename);
+
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+#endif /* IAMSUID */
+#endif /* BSD */
+
if (tmpstatbuf.st_dev != statbuf.st_dev ||
tmpstatbuf.st_ino != statbuf.st_ino) {
(void)PerlIO_close(rsfp);
if (tmpstatbuf.st_dev != PL_statbuf.st_dev ||
tmpstatbuf.st_ino != PL_statbuf.st_ino) {
(void)PerlIO_close(PL_rsfp);

View File

@ -1,6 +1,6 @@
--- makedepend.SH.orig Mon Sep 8 21:27:36 1997
+++ makedepend.SH Mon Sep 8 21:29:04 1997
@@ -60,6 +60,7 @@
--- makedepend.SH.ORIG Fri Jul 24 06:00:58 1998
+++ makedepend.SH Thu Jul 30 17:08:37 1998
@@ -67,6 +67,7 @@
# to be out of date. I don't know if OS/2 has touch, so do this:
case "$osname" in
os2) ;;

File diff suppressed because it is too large Load Diff

View File

@ -3,11 +3,11 @@
# Date created: 16 April 1995
# Whom: markm
#
# $Id: Makefile,v 1.22 1997/11/12 10:24:10 markm Exp $
# $Id: Makefile,v 1.23 1998/02/15 23:03:58 steve Exp $
#
DISTNAME= perl5.004_04
PKGNAME= perl-5.00404
DISTNAME= perl5.005_01
PKGNAME= perl-5.00501
CATEGORIES= lang devel perl5
MASTER_SITES= ftp://ftp.digital.com/pub/plan/perl/CPAN/src/5.0/ \
ftp://ftp.cdrom.com/pub/perl/CPAN/src/5.0/
@ -18,46 +18,61 @@ HAS_CONFIGURE= yes
CONFIGURE_SCRIPT= Configure
CONFIGURE_ARGS= -sde -Dprefix=${PREFIX}
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perlapio.1 perlbook.1 perlbot.1 \
perlbug.1 perlcall.1 perldata.1 perldebug.1 perldelta.1 perldiag.1 \
perldoc.1 perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 perlfaq8.1 \
perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllocale.1 \
perllol.1 perlmod.1 perlmodlib.1 perlobj.1 perlop.1 perlpod.1 \
perlre.1 perlref.1 perlrun.1 perlsec.1 perlstyle.1 perlsub.1 \
perlsyn.1 perltie.1 perltoc.1 perltoot.1 perltrap.1 perlvar.1 \
perlxs.1 perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 s2p.1 \
splain.1 xsubpp.1
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perl5004delta.1 \
perlapio.1 perlbook.1 perlbot.1 perlbug.1 perlcall.1 \
perldata.1 perldebug.1 perldelta.1 perldiag.1 perldoc.1 \
perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 \
perlfaq8.1 perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 \
perlhist.1 perlipc.1 perllocale.1 perllol.1 perlmod.1 \
perlmodinstall.1 perlmodlib.1 perlobj.1 perlop.1 \
perlpod.1 perlport.1 perlre.1 perlref.1 perlrun.1 \
perlsec.1 perlstyle.1 perlsub.1 perlsyn.1 perltie.1 \
perltoc.1 perltoot.1 perltrap.1 perlvar.1 perlxs.1 \
perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 \
s2p.1 splain.1 xsubpp.1
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 Benchmark.3 Bundle::CPAN.3 \
CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Fast.3 CGI::Push.3 \
CGI::Switch.3 CPAN.3 CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 \
Class::Struct.3 Config.3 Cwd.3 DB_File.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Exporter.3 \
ExtUtils::Command.3 ExtUtils::Embed.3 ExtUtils::Install.3 \
ExtUtils::Liblist.3 ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 \
ExtUtils::MM_VMS.3 ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 \
ExtUtils::Manifest.3 ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::testlib.3 Fcntl.3 File::Basename.3 \
File::CheckTree.3 File::Compare.3 File::Copy.3 File::DosGlob.3 \
File::Find.3 File::Path.3 File::stat.3 FileCache.3 FileHandle.3 \
FindBin.3 Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 IO::Select.3 \
IO::Socket.3 IPC::Open2.3 IPC::Open3.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 Net::Ping.3 \
Net::hostent.3 Net::netent.3 Net::protoent.3 Net::servent.3 Opcode.3 \
POSIX.3 Pod::Html.3 Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 B.3 B::Asmdata.3 \
B::Assembler.3 B::Bblock.3 B::Bytecode.3 B::C.3 B::CC.3 \
B::Debug.3 B::Deparse.3 B::Disassembler.3 B::Lint.3 \
B::Showlex.3 B::Stackobj.3 B::Terse.3 B::Xref.3 \
Benchmark.3 CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Cookie.3 \
CGI::Fast.3 CGI::Push.3 CGI::Switch.3 CPAN.3 \
CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 Class::Struct.3 \
Config.3 Cwd.3 DB_File.3 Data::Dumper.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Errno.3 \
Exporter.3 ExtUtils::Command.3 ExtUtils::Embed.3 \
ExtUtils::Install.3 ExtUtils::Installed.3 ExtUtils::Liblist.3 \
ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 ExtUtils::MM_VMS.3 \
ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 ExtUtils::Manifest.3 \
ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::Packlist.3 ExtUtils::testlib.3 \
Fatal.3 Fcntl.3 File::Basename.3 File::CheckTree.3 \
File::Compare.3 File::Copy.3 File::DosGlob.3 File::Find.3 \
File::Path.3 File::Spec.3 File::Spec::Mac.3 File::Spec::OS2.3 \
File::Spec::Unix.3 File::Spec::VMS.3 File::Spec::Win32.3 \
File::stat.3 FileCache.3 FileHandle.3 FindBin.3 \
Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 \
IO::Select.3 IO::Socket.3 IPC::Msg.3 IPC::Open2.3 \
IPC::Open3.3 IPC::Semaphore.3 IPC::SysV.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 \
Net::Ping.3 Net::hostent.3 Net::netent.3 Net::protoent.3 \
Net::servent.3 O.3 Opcode.3 POSIX.3 Pod::Html.3 \
Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
SelectSaver.3 SelfLoader.3 Shell.3 Socket.3 Symbol.3 \
Sys::Hostname.3 Sys::Syslog.3 Term::Cap.3 Term::Complete.3 \
Term::ReadLine.3 Test::Harness.3 Text::Abbrev.3 Text::ParseWords.3 \
Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 Tie::Hash.3 \
Tie::RefHash.3 Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 \
Time::gmtime.3 Time::localtime.3 Time::tm.3 UNIVERSAL.3 \
User::grent.3 User::pwent.3 autouse.3 base.3 blib.3 constant.3 \
diagnostics.3 integer.3 less.3 lib.3 locale.3 ops.3 overload.3 \
sigtrap.3 strict.3 subs.3 vars.3
Term::ReadLine.3 Test.3 Test::Harness.3 Text::Abbrev.3 \
Text::ParseWords.3 Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 \
Tie::Array.3 Tie::Handle.3 Tie::Hash.3 Tie::RefHash.3 \
Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 Time::gmtime.3 \
Time::localtime.3 Time::tm.3 UNIVERSAL.3 User::grent.3 \
User::pwent.3 attrs.3 autouse.3 base.3 blib.3 \
constant.3 diagnostics.3 fields.3 integer.3 less.3 \
lib.3 locale.3 ops.3 overload.3 re.3 sigtrap.3 \
strict.3 subs.3 vars.3
MAN3PREFIX= ${PREFIX}/lib/perl5
MAN3PREFIX= ${PREFIX}/lib/perl5/5.00501/
test:
@(cd ${WRKSRC}; make test)

View File

@ -1 +1 @@
MD5 (perl5.004_04.tar.gz) = 2618029201ad19cfb9a7d02a498eb1f4
MD5 (perl5.005_01.tar.gz) = 984d8d3bd86662461692a4caef114428

View File

@ -1,29 +1,11 @@
--- installperl.ORIG Mon May 12 05:22:27 1997
+++ installperl Fri May 23 11:40:27 1997
@@ -93,7 +93,7 @@
safe_unlink("$installbin/sperl$ver$exe_ext");
if ($d_dosuid) {
copy("suidperl$exe_ext", "$installbin/sperl$ver$exe_ext");
- chmod(04711, "$installbin/sperl$ver$exe_ext");
+ chmod(04111, "$installbin/sperl$ver$exe_ext");
}
# Install library files.
@@ -156,11 +156,12 @@
--- installperl.ORIG Thu Jul 30 15:58:50 1998
+++ installperl Thu Jul 30 16:02:16 1998
@@ -269,7 +269,7 @@
(-l $usrbinperl) &&
((readlink $usrbinperl) eq $expinstperl));
}
- if ((! $mainperl_is_instperl) &&
- (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
- "Do you wish to have $usrbinperl be the same as\n" .
- "$expinstperl? [y] ")))
- {
+# if ((! $mainperl_is_instperl) &&
+# (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
+# "Do you wish to have $usrbinperl be the same as\n" .
+# "$expinstperl? [y] ")))
+# {
+ if ('') { # MarkM - May 1997. Take the NO route always.
unlink($usrbinperl);
eval { CORE::link $instperl, $usrbinperl } ||
eval { symlink $expinstperl, $usrbinperl } ||
+ if ('' && (! $mainperl_is_instperl) &&
(yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
"Do you wish to have $usrbinperl be the same as\n" .
"$expinstperl? [y] ")))

View File

@ -1,6 +1,6 @@
--- hints/freebsd.sh.orig Wed Apr 23 16:01:37 1997
+++ hints/freebsd.sh Tue Jun 3 14:29:50 1997
@@ -63,6 +63,7 @@
--- hints/freebsd.sh.ORIG Fri Jul 24 06:00:19 1998
+++ hints/freebsd.sh Thu Jul 30 16:04:24 1998
@@ -68,6 +68,7 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'
@ -8,7 +8,7 @@
test -r ./broken-db.msg && . ./broken-db.msg
;;
#
@@ -76,12 +77,18 @@
@@ -81,12 +82,18 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'

View File

@ -1,6 +1,6 @@
--- perl.h.ORIG Mon Apr 28 17:36:10 1997
+++ perl.h Fri May 23 11:56:49 1997
@@ -223,6 +223,15 @@
--- perl.h.ORIG Thu Jul 30 17:04:42 1998
+++ perl.h Thu Jul 30 17:06:34 1998
@@ -361,6 +361,15 @@
# include <sys/param.h>
#endif
@ -16,26 +16,26 @@
/* Use all the "standard" definitions? */
#if defined(STANDARD_C) && defined(I_STDLIB)
--- perl5.004/perl.c.ORIG Fri May 16 00:14:03 1997
+++ perl.c Fri May 23 11:56:49 1997
@@ -1917,6 +1917,20 @@
--- perl.c.ORIG Thu Jul 30 17:04:23 1998
+++ perl.c Thu Jul 30 17:04:57 1998
@@ -2124,6 +2124,20 @@
croak("Can't swap uid and euid"); /* really paranoid */
if (Stat(SvPVX(GvSV(curcop->cop_filegv)),&tmpstatbuf) < 0)
if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0)
croak("Permission denied"); /* testing full pathname here */
+#if (defined(BSD) && (BSD >= 199306))
+#ifdef IAMSUID
+ {
+ struct statfs stfs;
+ {
+ struct statfs stfs;
+
+ if (fstatfs(fileno(rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",origfilename);
+ if (fstatfs(fileno(PL_rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",PL_origfilename);
+
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+#endif /* IAMSUID */
+#endif /* BSD */
+
if (tmpstatbuf.st_dev != statbuf.st_dev ||
tmpstatbuf.st_ino != statbuf.st_ino) {
(void)PerlIO_close(rsfp);
if (tmpstatbuf.st_dev != PL_statbuf.st_dev ||
tmpstatbuf.st_ino != PL_statbuf.st_ino) {
(void)PerlIO_close(PL_rsfp);

View File

@ -1,6 +1,6 @@
--- makedepend.SH.orig Mon Sep 8 21:27:36 1997
+++ makedepend.SH Mon Sep 8 21:29:04 1997
@@ -60,6 +60,7 @@
--- makedepend.SH.ORIG Fri Jul 24 06:00:58 1998
+++ makedepend.SH Thu Jul 30 17:08:37 1998
@@ -67,6 +67,7 @@
# to be out of date. I don't know if OS/2 has touch, so do this:
case "$osname" in
os2) ;;

File diff suppressed because it is too large Load Diff

View File

@ -3,11 +3,11 @@
# Date created: 16 April 1995
# Whom: markm
#
# $Id: Makefile,v 1.22 1997/11/12 10:24:10 markm Exp $
# $Id: Makefile,v 1.23 1998/02/15 23:03:58 steve Exp $
#
DISTNAME= perl5.004_04
PKGNAME= perl-5.00404
DISTNAME= perl5.005_01
PKGNAME= perl-5.00501
CATEGORIES= lang devel perl5
MASTER_SITES= ftp://ftp.digital.com/pub/plan/perl/CPAN/src/5.0/ \
ftp://ftp.cdrom.com/pub/perl/CPAN/src/5.0/
@ -18,46 +18,61 @@ HAS_CONFIGURE= yes
CONFIGURE_SCRIPT= Configure
CONFIGURE_ARGS= -sde -Dprefix=${PREFIX}
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perlapio.1 perlbook.1 perlbot.1 \
perlbug.1 perlcall.1 perldata.1 perldebug.1 perldelta.1 perldiag.1 \
perldoc.1 perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 perlfaq8.1 \
perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllocale.1 \
perllol.1 perlmod.1 perlmodlib.1 perlobj.1 perlop.1 perlpod.1 \
perlre.1 perlref.1 perlrun.1 perlsec.1 perlstyle.1 perlsub.1 \
perlsyn.1 perltie.1 perltoc.1 perltoot.1 perltrap.1 perlvar.1 \
perlxs.1 perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 s2p.1 \
splain.1 xsubpp.1
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perl5004delta.1 \
perlapio.1 perlbook.1 perlbot.1 perlbug.1 perlcall.1 \
perldata.1 perldebug.1 perldelta.1 perldiag.1 perldoc.1 \
perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 \
perlfaq8.1 perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 \
perlhist.1 perlipc.1 perllocale.1 perllol.1 perlmod.1 \
perlmodinstall.1 perlmodlib.1 perlobj.1 perlop.1 \
perlpod.1 perlport.1 perlre.1 perlref.1 perlrun.1 \
perlsec.1 perlstyle.1 perlsub.1 perlsyn.1 perltie.1 \
perltoc.1 perltoot.1 perltrap.1 perlvar.1 perlxs.1 \
perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 \
s2p.1 splain.1 xsubpp.1
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 Benchmark.3 Bundle::CPAN.3 \
CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Fast.3 CGI::Push.3 \
CGI::Switch.3 CPAN.3 CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 \
Class::Struct.3 Config.3 Cwd.3 DB_File.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Exporter.3 \
ExtUtils::Command.3 ExtUtils::Embed.3 ExtUtils::Install.3 \
ExtUtils::Liblist.3 ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 \
ExtUtils::MM_VMS.3 ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 \
ExtUtils::Manifest.3 ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::testlib.3 Fcntl.3 File::Basename.3 \
File::CheckTree.3 File::Compare.3 File::Copy.3 File::DosGlob.3 \
File::Find.3 File::Path.3 File::stat.3 FileCache.3 FileHandle.3 \
FindBin.3 Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 IO::Select.3 \
IO::Socket.3 IPC::Open2.3 IPC::Open3.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 Net::Ping.3 \
Net::hostent.3 Net::netent.3 Net::protoent.3 Net::servent.3 Opcode.3 \
POSIX.3 Pod::Html.3 Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 B.3 B::Asmdata.3 \
B::Assembler.3 B::Bblock.3 B::Bytecode.3 B::C.3 B::CC.3 \
B::Debug.3 B::Deparse.3 B::Disassembler.3 B::Lint.3 \
B::Showlex.3 B::Stackobj.3 B::Terse.3 B::Xref.3 \
Benchmark.3 CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Cookie.3 \
CGI::Fast.3 CGI::Push.3 CGI::Switch.3 CPAN.3 \
CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 Class::Struct.3 \
Config.3 Cwd.3 DB_File.3 Data::Dumper.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Errno.3 \
Exporter.3 ExtUtils::Command.3 ExtUtils::Embed.3 \
ExtUtils::Install.3 ExtUtils::Installed.3 ExtUtils::Liblist.3 \
ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 ExtUtils::MM_VMS.3 \
ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 ExtUtils::Manifest.3 \
ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::Packlist.3 ExtUtils::testlib.3 \
Fatal.3 Fcntl.3 File::Basename.3 File::CheckTree.3 \
File::Compare.3 File::Copy.3 File::DosGlob.3 File::Find.3 \
File::Path.3 File::Spec.3 File::Spec::Mac.3 File::Spec::OS2.3 \
File::Spec::Unix.3 File::Spec::VMS.3 File::Spec::Win32.3 \
File::stat.3 FileCache.3 FileHandle.3 FindBin.3 \
Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 \
IO::Select.3 IO::Socket.3 IPC::Msg.3 IPC::Open2.3 \
IPC::Open3.3 IPC::Semaphore.3 IPC::SysV.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 \
Net::Ping.3 Net::hostent.3 Net::netent.3 Net::protoent.3 \
Net::servent.3 O.3 Opcode.3 POSIX.3 Pod::Html.3 \
Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
SelectSaver.3 SelfLoader.3 Shell.3 Socket.3 Symbol.3 \
Sys::Hostname.3 Sys::Syslog.3 Term::Cap.3 Term::Complete.3 \
Term::ReadLine.3 Test::Harness.3 Text::Abbrev.3 Text::ParseWords.3 \
Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 Tie::Hash.3 \
Tie::RefHash.3 Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 \
Time::gmtime.3 Time::localtime.3 Time::tm.3 UNIVERSAL.3 \
User::grent.3 User::pwent.3 autouse.3 base.3 blib.3 constant.3 \
diagnostics.3 integer.3 less.3 lib.3 locale.3 ops.3 overload.3 \
sigtrap.3 strict.3 subs.3 vars.3
Term::ReadLine.3 Test.3 Test::Harness.3 Text::Abbrev.3 \
Text::ParseWords.3 Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 \
Tie::Array.3 Tie::Handle.3 Tie::Hash.3 Tie::RefHash.3 \
Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 Time::gmtime.3 \
Time::localtime.3 Time::tm.3 UNIVERSAL.3 User::grent.3 \
User::pwent.3 attrs.3 autouse.3 base.3 blib.3 \
constant.3 diagnostics.3 fields.3 integer.3 less.3 \
lib.3 locale.3 ops.3 overload.3 re.3 sigtrap.3 \
strict.3 subs.3 vars.3
MAN3PREFIX= ${PREFIX}/lib/perl5
MAN3PREFIX= ${PREFIX}/lib/perl5/5.00501/
test:
@(cd ${WRKSRC}; make test)

View File

@ -1 +1 @@
MD5 (perl5.004_04.tar.gz) = 2618029201ad19cfb9a7d02a498eb1f4
MD5 (perl5.005_01.tar.gz) = 984d8d3bd86662461692a4caef114428

View File

@ -1,29 +1,11 @@
--- installperl.ORIG Mon May 12 05:22:27 1997
+++ installperl Fri May 23 11:40:27 1997
@@ -93,7 +93,7 @@
safe_unlink("$installbin/sperl$ver$exe_ext");
if ($d_dosuid) {
copy("suidperl$exe_ext", "$installbin/sperl$ver$exe_ext");
- chmod(04711, "$installbin/sperl$ver$exe_ext");
+ chmod(04111, "$installbin/sperl$ver$exe_ext");
}
# Install library files.
@@ -156,11 +156,12 @@
--- installperl.ORIG Thu Jul 30 15:58:50 1998
+++ installperl Thu Jul 30 16:02:16 1998
@@ -269,7 +269,7 @@
(-l $usrbinperl) &&
((readlink $usrbinperl) eq $expinstperl));
}
- if ((! $mainperl_is_instperl) &&
- (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
- "Do you wish to have $usrbinperl be the same as\n" .
- "$expinstperl? [y] ")))
- {
+# if ((! $mainperl_is_instperl) &&
+# (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
+# "Do you wish to have $usrbinperl be the same as\n" .
+# "$expinstperl? [y] ")))
+# {
+ if ('') { # MarkM - May 1997. Take the NO route always.
unlink($usrbinperl);
eval { CORE::link $instperl, $usrbinperl } ||
eval { symlink $expinstperl, $usrbinperl } ||
+ if ('' && (! $mainperl_is_instperl) &&
(yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
"Do you wish to have $usrbinperl be the same as\n" .
"$expinstperl? [y] ")))

View File

@ -1,6 +1,6 @@
--- hints/freebsd.sh.orig Wed Apr 23 16:01:37 1997
+++ hints/freebsd.sh Tue Jun 3 14:29:50 1997
@@ -63,6 +63,7 @@
--- hints/freebsd.sh.ORIG Fri Jul 24 06:00:19 1998
+++ hints/freebsd.sh Thu Jul 30 16:04:24 1998
@@ -68,6 +68,7 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'
@ -8,7 +8,7 @@
test -r ./broken-db.msg && . ./broken-db.msg
;;
#
@@ -76,12 +77,18 @@
@@ -81,12 +82,18 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'

View File

@ -1,6 +1,6 @@
--- perl.h.ORIG Mon Apr 28 17:36:10 1997
+++ perl.h Fri May 23 11:56:49 1997
@@ -223,6 +223,15 @@
--- perl.h.ORIG Thu Jul 30 17:04:42 1998
+++ perl.h Thu Jul 30 17:06:34 1998
@@ -361,6 +361,15 @@
# include <sys/param.h>
#endif
@ -16,26 +16,26 @@
/* Use all the "standard" definitions? */
#if defined(STANDARD_C) && defined(I_STDLIB)
--- perl5.004/perl.c.ORIG Fri May 16 00:14:03 1997
+++ perl.c Fri May 23 11:56:49 1997
@@ -1917,6 +1917,20 @@
--- perl.c.ORIG Thu Jul 30 17:04:23 1998
+++ perl.c Thu Jul 30 17:04:57 1998
@@ -2124,6 +2124,20 @@
croak("Can't swap uid and euid"); /* really paranoid */
if (Stat(SvPVX(GvSV(curcop->cop_filegv)),&tmpstatbuf) < 0)
if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0)
croak("Permission denied"); /* testing full pathname here */
+#if (defined(BSD) && (BSD >= 199306))
+#ifdef IAMSUID
+ {
+ struct statfs stfs;
+ {
+ struct statfs stfs;
+
+ if (fstatfs(fileno(rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",origfilename);
+ if (fstatfs(fileno(PL_rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",PL_origfilename);
+
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+#endif /* IAMSUID */
+#endif /* BSD */
+
if (tmpstatbuf.st_dev != statbuf.st_dev ||
tmpstatbuf.st_ino != statbuf.st_ino) {
(void)PerlIO_close(rsfp);
if (tmpstatbuf.st_dev != PL_statbuf.st_dev ||
tmpstatbuf.st_ino != PL_statbuf.st_ino) {
(void)PerlIO_close(PL_rsfp);

View File

@ -1,6 +1,6 @@
--- makedepend.SH.orig Mon Sep 8 21:27:36 1997
+++ makedepend.SH Mon Sep 8 21:29:04 1997
@@ -60,6 +60,7 @@
--- makedepend.SH.ORIG Fri Jul 24 06:00:58 1998
+++ makedepend.SH Thu Jul 30 17:08:37 1998
@@ -67,6 +67,7 @@
# to be out of date. I don't know if OS/2 has touch, so do this:
case "$osname" in
os2) ;;

File diff suppressed because it is too large Load Diff

View File

@ -3,11 +3,11 @@
# Date created: 16 April 1995
# Whom: markm
#
# $Id: Makefile,v 1.22 1997/11/12 10:24:10 markm Exp $
# $Id: Makefile,v 1.23 1998/02/15 23:03:58 steve Exp $
#
DISTNAME= perl5.004_04
PKGNAME= perl-5.00404
DISTNAME= perl5.005_01
PKGNAME= perl-5.00501
CATEGORIES= lang devel perl5
MASTER_SITES= ftp://ftp.digital.com/pub/plan/perl/CPAN/src/5.0/ \
ftp://ftp.cdrom.com/pub/perl/CPAN/src/5.0/
@ -18,46 +18,61 @@ HAS_CONFIGURE= yes
CONFIGURE_SCRIPT= Configure
CONFIGURE_ARGS= -sde -Dprefix=${PREFIX}
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perlapio.1 perlbook.1 perlbot.1 \
perlbug.1 perlcall.1 perldata.1 perldebug.1 perldelta.1 perldiag.1 \
perldoc.1 perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 perlfaq8.1 \
perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllocale.1 \
perllol.1 perlmod.1 perlmodlib.1 perlobj.1 perlop.1 perlpod.1 \
perlre.1 perlref.1 perlrun.1 perlsec.1 perlstyle.1 perlsub.1 \
perlsyn.1 perltie.1 perltoc.1 perltoot.1 perltrap.1 perlvar.1 \
perlxs.1 perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 s2p.1 \
splain.1 xsubpp.1
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perl5004delta.1 \
perlapio.1 perlbook.1 perlbot.1 perlbug.1 perlcall.1 \
perldata.1 perldebug.1 perldelta.1 perldiag.1 perldoc.1 \
perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 \
perlfaq8.1 perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 \
perlhist.1 perlipc.1 perllocale.1 perllol.1 perlmod.1 \
perlmodinstall.1 perlmodlib.1 perlobj.1 perlop.1 \
perlpod.1 perlport.1 perlre.1 perlref.1 perlrun.1 \
perlsec.1 perlstyle.1 perlsub.1 perlsyn.1 perltie.1 \
perltoc.1 perltoot.1 perltrap.1 perlvar.1 perlxs.1 \
perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 \
s2p.1 splain.1 xsubpp.1
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 Benchmark.3 Bundle::CPAN.3 \
CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Fast.3 CGI::Push.3 \
CGI::Switch.3 CPAN.3 CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 \
Class::Struct.3 Config.3 Cwd.3 DB_File.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Exporter.3 \
ExtUtils::Command.3 ExtUtils::Embed.3 ExtUtils::Install.3 \
ExtUtils::Liblist.3 ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 \
ExtUtils::MM_VMS.3 ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 \
ExtUtils::Manifest.3 ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::testlib.3 Fcntl.3 File::Basename.3 \
File::CheckTree.3 File::Compare.3 File::Copy.3 File::DosGlob.3 \
File::Find.3 File::Path.3 File::stat.3 FileCache.3 FileHandle.3 \
FindBin.3 Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 IO::Select.3 \
IO::Socket.3 IPC::Open2.3 IPC::Open3.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 Net::Ping.3 \
Net::hostent.3 Net::netent.3 Net::protoent.3 Net::servent.3 Opcode.3 \
POSIX.3 Pod::Html.3 Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 B.3 B::Asmdata.3 \
B::Assembler.3 B::Bblock.3 B::Bytecode.3 B::C.3 B::CC.3 \
B::Debug.3 B::Deparse.3 B::Disassembler.3 B::Lint.3 \
B::Showlex.3 B::Stackobj.3 B::Terse.3 B::Xref.3 \
Benchmark.3 CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Cookie.3 \
CGI::Fast.3 CGI::Push.3 CGI::Switch.3 CPAN.3 \
CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 Class::Struct.3 \
Config.3 Cwd.3 DB_File.3 Data::Dumper.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Errno.3 \
Exporter.3 ExtUtils::Command.3 ExtUtils::Embed.3 \
ExtUtils::Install.3 ExtUtils::Installed.3 ExtUtils::Liblist.3 \
ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 ExtUtils::MM_VMS.3 \
ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 ExtUtils::Manifest.3 \
ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::Packlist.3 ExtUtils::testlib.3 \
Fatal.3 Fcntl.3 File::Basename.3 File::CheckTree.3 \
File::Compare.3 File::Copy.3 File::DosGlob.3 File::Find.3 \
File::Path.3 File::Spec.3 File::Spec::Mac.3 File::Spec::OS2.3 \
File::Spec::Unix.3 File::Spec::VMS.3 File::Spec::Win32.3 \
File::stat.3 FileCache.3 FileHandle.3 FindBin.3 \
Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 \
IO::Select.3 IO::Socket.3 IPC::Msg.3 IPC::Open2.3 \
IPC::Open3.3 IPC::Semaphore.3 IPC::SysV.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 \
Net::Ping.3 Net::hostent.3 Net::netent.3 Net::protoent.3 \
Net::servent.3 O.3 Opcode.3 POSIX.3 Pod::Html.3 \
Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
SelectSaver.3 SelfLoader.3 Shell.3 Socket.3 Symbol.3 \
Sys::Hostname.3 Sys::Syslog.3 Term::Cap.3 Term::Complete.3 \
Term::ReadLine.3 Test::Harness.3 Text::Abbrev.3 Text::ParseWords.3 \
Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 Tie::Hash.3 \
Tie::RefHash.3 Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 \
Time::gmtime.3 Time::localtime.3 Time::tm.3 UNIVERSAL.3 \
User::grent.3 User::pwent.3 autouse.3 base.3 blib.3 constant.3 \
diagnostics.3 integer.3 less.3 lib.3 locale.3 ops.3 overload.3 \
sigtrap.3 strict.3 subs.3 vars.3
Term::ReadLine.3 Test.3 Test::Harness.3 Text::Abbrev.3 \
Text::ParseWords.3 Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 \
Tie::Array.3 Tie::Handle.3 Tie::Hash.3 Tie::RefHash.3 \
Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 Time::gmtime.3 \
Time::localtime.3 Time::tm.3 UNIVERSAL.3 User::grent.3 \
User::pwent.3 attrs.3 autouse.3 base.3 blib.3 \
constant.3 diagnostics.3 fields.3 integer.3 less.3 \
lib.3 locale.3 ops.3 overload.3 re.3 sigtrap.3 \
strict.3 subs.3 vars.3
MAN3PREFIX= ${PREFIX}/lib/perl5
MAN3PREFIX= ${PREFIX}/lib/perl5/5.00501/
test:
@(cd ${WRKSRC}; make test)

View File

@ -1 +1 @@
MD5 (perl5.004_04.tar.gz) = 2618029201ad19cfb9a7d02a498eb1f4
MD5 (perl5.005_01.tar.gz) = 984d8d3bd86662461692a4caef114428

View File

@ -1,29 +1,11 @@
--- installperl.ORIG Mon May 12 05:22:27 1997
+++ installperl Fri May 23 11:40:27 1997
@@ -93,7 +93,7 @@
safe_unlink("$installbin/sperl$ver$exe_ext");
if ($d_dosuid) {
copy("suidperl$exe_ext", "$installbin/sperl$ver$exe_ext");
- chmod(04711, "$installbin/sperl$ver$exe_ext");
+ chmod(04111, "$installbin/sperl$ver$exe_ext");
}
# Install library files.
@@ -156,11 +156,12 @@
--- installperl.ORIG Thu Jul 30 15:58:50 1998
+++ installperl Thu Jul 30 16:02:16 1998
@@ -269,7 +269,7 @@
(-l $usrbinperl) &&
((readlink $usrbinperl) eq $expinstperl));
}
- if ((! $mainperl_is_instperl) &&
- (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
- "Do you wish to have $usrbinperl be the same as\n" .
- "$expinstperl? [y] ")))
- {
+# if ((! $mainperl_is_instperl) &&
+# (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
+# "Do you wish to have $usrbinperl be the same as\n" .
+# "$expinstperl? [y] ")))
+# {
+ if ('') { # MarkM - May 1997. Take the NO route always.
unlink($usrbinperl);
eval { CORE::link $instperl, $usrbinperl } ||
eval { symlink $expinstperl, $usrbinperl } ||
+ if ('' && (! $mainperl_is_instperl) &&
(yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
"Do you wish to have $usrbinperl be the same as\n" .
"$expinstperl? [y] ")))

View File

@ -1,6 +1,6 @@
--- hints/freebsd.sh.orig Wed Apr 23 16:01:37 1997
+++ hints/freebsd.sh Tue Jun 3 14:29:50 1997
@@ -63,6 +63,7 @@
--- hints/freebsd.sh.ORIG Fri Jul 24 06:00:19 1998
+++ hints/freebsd.sh Thu Jul 30 16:04:24 1998
@@ -68,6 +68,7 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'
@ -8,7 +8,7 @@
test -r ./broken-db.msg && . ./broken-db.msg
;;
#
@@ -76,12 +77,18 @@
@@ -81,12 +82,18 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'

View File

@ -1,6 +1,6 @@
--- perl.h.ORIG Mon Apr 28 17:36:10 1997
+++ perl.h Fri May 23 11:56:49 1997
@@ -223,6 +223,15 @@
--- perl.h.ORIG Thu Jul 30 17:04:42 1998
+++ perl.h Thu Jul 30 17:06:34 1998
@@ -361,6 +361,15 @@
# include <sys/param.h>
#endif
@ -16,26 +16,26 @@
/* Use all the "standard" definitions? */
#if defined(STANDARD_C) && defined(I_STDLIB)
--- perl5.004/perl.c.ORIG Fri May 16 00:14:03 1997
+++ perl.c Fri May 23 11:56:49 1997
@@ -1917,6 +1917,20 @@
--- perl.c.ORIG Thu Jul 30 17:04:23 1998
+++ perl.c Thu Jul 30 17:04:57 1998
@@ -2124,6 +2124,20 @@
croak("Can't swap uid and euid"); /* really paranoid */
if (Stat(SvPVX(GvSV(curcop->cop_filegv)),&tmpstatbuf) < 0)
if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0)
croak("Permission denied"); /* testing full pathname here */
+#if (defined(BSD) && (BSD >= 199306))
+#ifdef IAMSUID
+ {
+ struct statfs stfs;
+ {
+ struct statfs stfs;
+
+ if (fstatfs(fileno(rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",origfilename);
+ if (fstatfs(fileno(PL_rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",PL_origfilename);
+
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+#endif /* IAMSUID */
+#endif /* BSD */
+
if (tmpstatbuf.st_dev != statbuf.st_dev ||
tmpstatbuf.st_ino != statbuf.st_ino) {
(void)PerlIO_close(rsfp);
if (tmpstatbuf.st_dev != PL_statbuf.st_dev ||
tmpstatbuf.st_ino != PL_statbuf.st_ino) {
(void)PerlIO_close(PL_rsfp);

View File

@ -1,6 +1,6 @@
--- makedepend.SH.orig Mon Sep 8 21:27:36 1997
+++ makedepend.SH Mon Sep 8 21:29:04 1997
@@ -60,6 +60,7 @@
--- makedepend.SH.ORIG Fri Jul 24 06:00:58 1998
+++ makedepend.SH Thu Jul 30 17:08:37 1998
@@ -67,6 +67,7 @@
# to be out of date. I don't know if OS/2 has touch, so do this:
case "$osname" in
os2) ;;

File diff suppressed because it is too large Load Diff

View File

@ -3,11 +3,11 @@
# Date created: 16 April 1995
# Whom: markm
#
# $Id: Makefile,v 1.22 1997/11/12 10:24:10 markm Exp $
# $Id: Makefile,v 1.23 1998/02/15 23:03:58 steve Exp $
#
DISTNAME= perl5.004_04
PKGNAME= perl-5.00404
DISTNAME= perl5.005_01
PKGNAME= perl-5.00501
CATEGORIES= lang devel perl5
MASTER_SITES= ftp://ftp.digital.com/pub/plan/perl/CPAN/src/5.0/ \
ftp://ftp.cdrom.com/pub/perl/CPAN/src/5.0/
@ -18,46 +18,61 @@ HAS_CONFIGURE= yes
CONFIGURE_SCRIPT= Configure
CONFIGURE_ARGS= -sde -Dprefix=${PREFIX}
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perlapio.1 perlbook.1 perlbot.1 \
perlbug.1 perlcall.1 perldata.1 perldebug.1 perldelta.1 perldiag.1 \
perldoc.1 perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 perlfaq8.1 \
perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllocale.1 \
perllol.1 perlmod.1 perlmodlib.1 perlobj.1 perlop.1 perlpod.1 \
perlre.1 perlref.1 perlrun.1 perlsec.1 perlstyle.1 perlsub.1 \
perlsyn.1 perltie.1 perltoc.1 perltoot.1 perltrap.1 perlvar.1 \
perlxs.1 perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 s2p.1 \
splain.1 xsubpp.1
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perl5004delta.1 \
perlapio.1 perlbook.1 perlbot.1 perlbug.1 perlcall.1 \
perldata.1 perldebug.1 perldelta.1 perldiag.1 perldoc.1 \
perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 \
perlfaq8.1 perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 \
perlhist.1 perlipc.1 perllocale.1 perllol.1 perlmod.1 \
perlmodinstall.1 perlmodlib.1 perlobj.1 perlop.1 \
perlpod.1 perlport.1 perlre.1 perlref.1 perlrun.1 \
perlsec.1 perlstyle.1 perlsub.1 perlsyn.1 perltie.1 \
perltoc.1 perltoot.1 perltrap.1 perlvar.1 perlxs.1 \
perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 \
s2p.1 splain.1 xsubpp.1
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 Benchmark.3 Bundle::CPAN.3 \
CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Fast.3 CGI::Push.3 \
CGI::Switch.3 CPAN.3 CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 \
Class::Struct.3 Config.3 Cwd.3 DB_File.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Exporter.3 \
ExtUtils::Command.3 ExtUtils::Embed.3 ExtUtils::Install.3 \
ExtUtils::Liblist.3 ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 \
ExtUtils::MM_VMS.3 ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 \
ExtUtils::Manifest.3 ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::testlib.3 Fcntl.3 File::Basename.3 \
File::CheckTree.3 File::Compare.3 File::Copy.3 File::DosGlob.3 \
File::Find.3 File::Path.3 File::stat.3 FileCache.3 FileHandle.3 \
FindBin.3 Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 IO::Select.3 \
IO::Socket.3 IPC::Open2.3 IPC::Open3.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 Net::Ping.3 \
Net::hostent.3 Net::netent.3 Net::protoent.3 Net::servent.3 Opcode.3 \
POSIX.3 Pod::Html.3 Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 B.3 B::Asmdata.3 \
B::Assembler.3 B::Bblock.3 B::Bytecode.3 B::C.3 B::CC.3 \
B::Debug.3 B::Deparse.3 B::Disassembler.3 B::Lint.3 \
B::Showlex.3 B::Stackobj.3 B::Terse.3 B::Xref.3 \
Benchmark.3 CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Cookie.3 \
CGI::Fast.3 CGI::Push.3 CGI::Switch.3 CPAN.3 \
CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 Class::Struct.3 \
Config.3 Cwd.3 DB_File.3 Data::Dumper.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Errno.3 \
Exporter.3 ExtUtils::Command.3 ExtUtils::Embed.3 \
ExtUtils::Install.3 ExtUtils::Installed.3 ExtUtils::Liblist.3 \
ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 ExtUtils::MM_VMS.3 \
ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 ExtUtils::Manifest.3 \
ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::Packlist.3 ExtUtils::testlib.3 \
Fatal.3 Fcntl.3 File::Basename.3 File::CheckTree.3 \
File::Compare.3 File::Copy.3 File::DosGlob.3 File::Find.3 \
File::Path.3 File::Spec.3 File::Spec::Mac.3 File::Spec::OS2.3 \
File::Spec::Unix.3 File::Spec::VMS.3 File::Spec::Win32.3 \
File::stat.3 FileCache.3 FileHandle.3 FindBin.3 \
Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 \
IO::Select.3 IO::Socket.3 IPC::Msg.3 IPC::Open2.3 \
IPC::Open3.3 IPC::Semaphore.3 IPC::SysV.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 \
Net::Ping.3 Net::hostent.3 Net::netent.3 Net::protoent.3 \
Net::servent.3 O.3 Opcode.3 POSIX.3 Pod::Html.3 \
Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
SelectSaver.3 SelfLoader.3 Shell.3 Socket.3 Symbol.3 \
Sys::Hostname.3 Sys::Syslog.3 Term::Cap.3 Term::Complete.3 \
Term::ReadLine.3 Test::Harness.3 Text::Abbrev.3 Text::ParseWords.3 \
Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 Tie::Hash.3 \
Tie::RefHash.3 Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 \
Time::gmtime.3 Time::localtime.3 Time::tm.3 UNIVERSAL.3 \
User::grent.3 User::pwent.3 autouse.3 base.3 blib.3 constant.3 \
diagnostics.3 integer.3 less.3 lib.3 locale.3 ops.3 overload.3 \
sigtrap.3 strict.3 subs.3 vars.3
Term::ReadLine.3 Test.3 Test::Harness.3 Text::Abbrev.3 \
Text::ParseWords.3 Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 \
Tie::Array.3 Tie::Handle.3 Tie::Hash.3 Tie::RefHash.3 \
Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 Time::gmtime.3 \
Time::localtime.3 Time::tm.3 UNIVERSAL.3 User::grent.3 \
User::pwent.3 attrs.3 autouse.3 base.3 blib.3 \
constant.3 diagnostics.3 fields.3 integer.3 less.3 \
lib.3 locale.3 ops.3 overload.3 re.3 sigtrap.3 \
strict.3 subs.3 vars.3
MAN3PREFIX= ${PREFIX}/lib/perl5
MAN3PREFIX= ${PREFIX}/lib/perl5/5.00501/
test:
@(cd ${WRKSRC}; make test)

View File

@ -1 +1 @@
MD5 (perl5.004_04.tar.gz) = 2618029201ad19cfb9a7d02a498eb1f4
MD5 (perl5.005_01.tar.gz) = 984d8d3bd86662461692a4caef114428

View File

@ -1,29 +1,11 @@
--- installperl.ORIG Mon May 12 05:22:27 1997
+++ installperl Fri May 23 11:40:27 1997
@@ -93,7 +93,7 @@
safe_unlink("$installbin/sperl$ver$exe_ext");
if ($d_dosuid) {
copy("suidperl$exe_ext", "$installbin/sperl$ver$exe_ext");
- chmod(04711, "$installbin/sperl$ver$exe_ext");
+ chmod(04111, "$installbin/sperl$ver$exe_ext");
}
# Install library files.
@@ -156,11 +156,12 @@
--- installperl.ORIG Thu Jul 30 15:58:50 1998
+++ installperl Thu Jul 30 16:02:16 1998
@@ -269,7 +269,7 @@
(-l $usrbinperl) &&
((readlink $usrbinperl) eq $expinstperl));
}
- if ((! $mainperl_is_instperl) &&
- (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
- "Do you wish to have $usrbinperl be the same as\n" .
- "$expinstperl? [y] ")))
- {
+# if ((! $mainperl_is_instperl) &&
+# (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
+# "Do you wish to have $usrbinperl be the same as\n" .
+# "$expinstperl? [y] ")))
+# {
+ if ('') { # MarkM - May 1997. Take the NO route always.
unlink($usrbinperl);
eval { CORE::link $instperl, $usrbinperl } ||
eval { symlink $expinstperl, $usrbinperl } ||
+ if ('' && (! $mainperl_is_instperl) &&
(yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
"Do you wish to have $usrbinperl be the same as\n" .
"$expinstperl? [y] ")))

View File

@ -1,6 +1,6 @@
--- hints/freebsd.sh.orig Wed Apr 23 16:01:37 1997
+++ hints/freebsd.sh Tue Jun 3 14:29:50 1997
@@ -63,6 +63,7 @@
--- hints/freebsd.sh.ORIG Fri Jul 24 06:00:19 1998
+++ hints/freebsd.sh Thu Jul 30 16:04:24 1998
@@ -68,6 +68,7 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'
@ -8,7 +8,7 @@
test -r ./broken-db.msg && . ./broken-db.msg
;;
#
@@ -76,12 +77,18 @@
@@ -81,12 +82,18 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'

View File

@ -1,6 +1,6 @@
--- perl.h.ORIG Mon Apr 28 17:36:10 1997
+++ perl.h Fri May 23 11:56:49 1997
@@ -223,6 +223,15 @@
--- perl.h.ORIG Thu Jul 30 17:04:42 1998
+++ perl.h Thu Jul 30 17:06:34 1998
@@ -361,6 +361,15 @@
# include <sys/param.h>
#endif
@ -16,26 +16,26 @@
/* Use all the "standard" definitions? */
#if defined(STANDARD_C) && defined(I_STDLIB)
--- perl5.004/perl.c.ORIG Fri May 16 00:14:03 1997
+++ perl.c Fri May 23 11:56:49 1997
@@ -1917,6 +1917,20 @@
--- perl.c.ORIG Thu Jul 30 17:04:23 1998
+++ perl.c Thu Jul 30 17:04:57 1998
@@ -2124,6 +2124,20 @@
croak("Can't swap uid and euid"); /* really paranoid */
if (Stat(SvPVX(GvSV(curcop->cop_filegv)),&tmpstatbuf) < 0)
if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0)
croak("Permission denied"); /* testing full pathname here */
+#if (defined(BSD) && (BSD >= 199306))
+#ifdef IAMSUID
+ {
+ struct statfs stfs;
+ {
+ struct statfs stfs;
+
+ if (fstatfs(fileno(rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",origfilename);
+ if (fstatfs(fileno(PL_rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",PL_origfilename);
+
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+#endif /* IAMSUID */
+#endif /* BSD */
+
if (tmpstatbuf.st_dev != statbuf.st_dev ||
tmpstatbuf.st_ino != statbuf.st_ino) {
(void)PerlIO_close(rsfp);
if (tmpstatbuf.st_dev != PL_statbuf.st_dev ||
tmpstatbuf.st_ino != PL_statbuf.st_ino) {
(void)PerlIO_close(PL_rsfp);

View File

@ -1,6 +1,6 @@
--- makedepend.SH.orig Mon Sep 8 21:27:36 1997
+++ makedepend.SH Mon Sep 8 21:29:04 1997
@@ -60,6 +60,7 @@
--- makedepend.SH.ORIG Fri Jul 24 06:00:58 1998
+++ makedepend.SH Thu Jul 30 17:08:37 1998
@@ -67,6 +67,7 @@
# to be out of date. I don't know if OS/2 has touch, so do this:
case "$osname" in
os2) ;;

File diff suppressed because it is too large Load Diff

View File

@ -3,11 +3,11 @@
# Date created: 16 April 1995
# Whom: markm
#
# $Id: Makefile,v 1.22 1997/11/12 10:24:10 markm Exp $
# $Id: Makefile,v 1.23 1998/02/15 23:03:58 steve Exp $
#
DISTNAME= perl5.004_04
PKGNAME= perl-5.00404
DISTNAME= perl5.005_01
PKGNAME= perl-5.00501
CATEGORIES= lang devel perl5
MASTER_SITES= ftp://ftp.digital.com/pub/plan/perl/CPAN/src/5.0/ \
ftp://ftp.cdrom.com/pub/perl/CPAN/src/5.0/
@ -18,46 +18,61 @@ HAS_CONFIGURE= yes
CONFIGURE_SCRIPT= Configure
CONFIGURE_ARGS= -sde -Dprefix=${PREFIX}
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perlapio.1 perlbook.1 perlbot.1 \
perlbug.1 perlcall.1 perldata.1 perldebug.1 perldelta.1 perldiag.1 \
perldoc.1 perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 perlfaq8.1 \
perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllocale.1 \
perllol.1 perlmod.1 perlmodlib.1 perlobj.1 perlop.1 perlpod.1 \
perlre.1 perlref.1 perlrun.1 perlsec.1 perlstyle.1 perlsub.1 \
perlsyn.1 perltie.1 perltoc.1 perltoot.1 perltrap.1 perlvar.1 \
perlxs.1 perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 s2p.1 \
splain.1 xsubpp.1
MAN1= a2p.1 c2ph.1 h2ph.1 h2xs.1 perl.1 perl5004delta.1 \
perlapio.1 perlbook.1 perlbot.1 perlbug.1 perlcall.1 \
perldata.1 perldebug.1 perldelta.1 perldiag.1 perldoc.1 \
perldsc.1 perlembed.1 perlfaq.1 perlfaq1.1 perlfaq2.1 \
perlfaq3.1 perlfaq4.1 perlfaq5.1 perlfaq6.1 perlfaq7.1 \
perlfaq8.1 perlfaq9.1 perlform.1 perlfunc.1 perlguts.1 \
perlhist.1 perlipc.1 perllocale.1 perllol.1 perlmod.1 \
perlmodinstall.1 perlmodlib.1 perlobj.1 perlop.1 \
perlpod.1 perlport.1 perlre.1 perlref.1 perlrun.1 \
perlsec.1 perlstyle.1 perlsub.1 perlsyn.1 perltie.1 \
perltoc.1 perltoot.1 perltrap.1 perlvar.1 perlxs.1 \
perlxstut.1 pl2pm.1 pod2html.1 pod2man.1 pstruct.1 \
s2p.1 splain.1 xsubpp.1
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 Benchmark.3 Bundle::CPAN.3 \
CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Fast.3 CGI::Push.3 \
CGI::Switch.3 CPAN.3 CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 \
Class::Struct.3 Config.3 Cwd.3 DB_File.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Exporter.3 \
ExtUtils::Command.3 ExtUtils::Embed.3 ExtUtils::Install.3 \
ExtUtils::Liblist.3 ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 \
ExtUtils::MM_VMS.3 ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 \
ExtUtils::Manifest.3 ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::testlib.3 Fcntl.3 File::Basename.3 \
File::CheckTree.3 File::Compare.3 File::Copy.3 File::DosGlob.3 \
File::Find.3 File::Path.3 File::stat.3 FileCache.3 FileHandle.3 \
FindBin.3 Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 IO::Select.3 \
IO::Socket.3 IPC::Open2.3 IPC::Open3.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 Net::Ping.3 \
Net::hostent.3 Net::netent.3 Net::protoent.3 Net::servent.3 Opcode.3 \
POSIX.3 Pod::Html.3 Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
MAN3= AnyDBM_File.3 AutoLoader.3 AutoSplit.3 B.3 B::Asmdata.3 \
B::Assembler.3 B::Bblock.3 B::Bytecode.3 B::C.3 B::CC.3 \
B::Debug.3 B::Deparse.3 B::Disassembler.3 B::Lint.3 \
B::Showlex.3 B::Stackobj.3 B::Terse.3 B::Xref.3 \
Benchmark.3 CGI.3 CGI::Apache.3 CGI::Carp.3 CGI::Cookie.3 \
CGI::Fast.3 CGI::Push.3 CGI::Switch.3 CPAN.3 \
CPAN::FirstTime.3 CPAN::Nox.3 Carp.3 Class::Struct.3 \
Config.3 Cwd.3 DB_File.3 Data::Dumper.3 Devel::SelfStubber.3 \
DirHandle.3 DynaLoader.3 English.3 Env.3 Errno.3 \
Exporter.3 ExtUtils::Command.3 ExtUtils::Embed.3 \
ExtUtils::Install.3 ExtUtils::Installed.3 ExtUtils::Liblist.3 \
ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 ExtUtils::MM_VMS.3 \
ExtUtils::MM_Win32.3 ExtUtils::MakeMaker.3 ExtUtils::Manifest.3 \
ExtUtils::Miniperl.3 ExtUtils::Mkbootstrap.3 \
ExtUtils::Mksymlists.3 ExtUtils::Packlist.3 ExtUtils::testlib.3 \
Fatal.3 Fcntl.3 File::Basename.3 File::CheckTree.3 \
File::Compare.3 File::Copy.3 File::DosGlob.3 File::Find.3 \
File::Path.3 File::Spec.3 File::Spec::Mac.3 File::Spec::OS2.3 \
File::Spec::Unix.3 File::Spec::VMS.3 File::Spec::Win32.3 \
File::stat.3 FileCache.3 FileHandle.3 FindBin.3 \
Getopt::Long.3 Getopt::Std.3 I18N::Collate.3 IO.3 \
IO::File.3 IO::Handle.3 IO::Pipe.3 IO::Seekable.3 \
IO::Select.3 IO::Socket.3 IPC::Msg.3 IPC::Open2.3 \
IPC::Open3.3 IPC::Semaphore.3 IPC::SysV.3 Math::BigFloat.3 \
Math::BigInt.3 Math::Complex.3 Math::Trig.3 NDBM_File.3 \
Net::Ping.3 Net::hostent.3 Net::netent.3 Net::protoent.3 \
Net::servent.3 O.3 Opcode.3 POSIX.3 Pod::Html.3 \
Pod::Text.3 SDBM_File.3 Safe.3 Search::Dict.3 \
SelectSaver.3 SelfLoader.3 Shell.3 Socket.3 Symbol.3 \
Sys::Hostname.3 Sys::Syslog.3 Term::Cap.3 Term::Complete.3 \
Term::ReadLine.3 Test::Harness.3 Text::Abbrev.3 Text::ParseWords.3 \
Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 Tie::Hash.3 \
Tie::RefHash.3 Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 \
Time::gmtime.3 Time::localtime.3 Time::tm.3 UNIVERSAL.3 \
User::grent.3 User::pwent.3 autouse.3 base.3 blib.3 constant.3 \
diagnostics.3 integer.3 less.3 lib.3 locale.3 ops.3 overload.3 \
sigtrap.3 strict.3 subs.3 vars.3
Term::ReadLine.3 Test.3 Test::Harness.3 Text::Abbrev.3 \
Text::ParseWords.3 Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 \
Tie::Array.3 Tie::Handle.3 Tie::Hash.3 Tie::RefHash.3 \
Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 Time::gmtime.3 \
Time::localtime.3 Time::tm.3 UNIVERSAL.3 User::grent.3 \
User::pwent.3 attrs.3 autouse.3 base.3 blib.3 \
constant.3 diagnostics.3 fields.3 integer.3 less.3 \
lib.3 locale.3 ops.3 overload.3 re.3 sigtrap.3 \
strict.3 subs.3 vars.3
MAN3PREFIX= ${PREFIX}/lib/perl5
MAN3PREFIX= ${PREFIX}/lib/perl5/5.00501/
test:
@(cd ${WRKSRC}; make test)

View File

@ -1 +1 @@
MD5 (perl5.004_04.tar.gz) = 2618029201ad19cfb9a7d02a498eb1f4
MD5 (perl5.005_01.tar.gz) = 984d8d3bd86662461692a4caef114428

View File

@ -1,29 +1,11 @@
--- installperl.ORIG Mon May 12 05:22:27 1997
+++ installperl Fri May 23 11:40:27 1997
@@ -93,7 +93,7 @@
safe_unlink("$installbin/sperl$ver$exe_ext");
if ($d_dosuid) {
copy("suidperl$exe_ext", "$installbin/sperl$ver$exe_ext");
- chmod(04711, "$installbin/sperl$ver$exe_ext");
+ chmod(04111, "$installbin/sperl$ver$exe_ext");
}
# Install library files.
@@ -156,11 +156,12 @@
--- installperl.ORIG Thu Jul 30 15:58:50 1998
+++ installperl Thu Jul 30 16:02:16 1998
@@ -269,7 +269,7 @@
(-l $usrbinperl) &&
((readlink $usrbinperl) eq $expinstperl));
}
- if ((! $mainperl_is_instperl) &&
- (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
- "Do you wish to have $usrbinperl be the same as\n" .
- "$expinstperl? [y] ")))
- {
+# if ((! $mainperl_is_instperl) &&
+# (yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
+# "Do you wish to have $usrbinperl be the same as\n" .
+# "$expinstperl? [y] ")))
+# {
+ if ('') { # MarkM - May 1997. Take the NO route always.
unlink($usrbinperl);
eval { CORE::link $instperl, $usrbinperl } ||
eval { symlink $expinstperl, $usrbinperl } ||
+ if ('' && (! $mainperl_is_instperl) &&
(yn("Many scripts expect perl to be installed as $usrbinperl.\n" .
"Do you wish to have $usrbinperl be the same as\n" .
"$expinstperl? [y] ")))

View File

@ -1,6 +1,6 @@
--- hints/freebsd.sh.orig Wed Apr 23 16:01:37 1997
+++ hints/freebsd.sh Tue Jun 3 14:29:50 1997
@@ -63,6 +63,7 @@
--- hints/freebsd.sh.ORIG Fri Jul 24 06:00:19 1998
+++ hints/freebsd.sh Thu Jul 30 16:04:24 1998
@@ -68,6 +68,7 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'
@ -8,7 +8,7 @@
test -r ./broken-db.msg && . ./broken-db.msg
;;
#
@@ -76,12 +77,18 @@
@@ -81,12 +82,18 @@
d_setreuid='define'
d_setegid='undef'
d_seteuid='undef'

View File

@ -1,6 +1,6 @@
--- perl.h.ORIG Mon Apr 28 17:36:10 1997
+++ perl.h Fri May 23 11:56:49 1997
@@ -223,6 +223,15 @@
--- perl.h.ORIG Thu Jul 30 17:04:42 1998
+++ perl.h Thu Jul 30 17:06:34 1998
@@ -361,6 +361,15 @@
# include <sys/param.h>
#endif
@ -16,26 +16,26 @@
/* Use all the "standard" definitions? */
#if defined(STANDARD_C) && defined(I_STDLIB)
--- perl5.004/perl.c.ORIG Fri May 16 00:14:03 1997
+++ perl.c Fri May 23 11:56:49 1997
@@ -1917,6 +1917,20 @@
--- perl.c.ORIG Thu Jul 30 17:04:23 1998
+++ perl.c Thu Jul 30 17:04:57 1998
@@ -2124,6 +2124,20 @@
croak("Can't swap uid and euid"); /* really paranoid */
if (Stat(SvPVX(GvSV(curcop->cop_filegv)),&tmpstatbuf) < 0)
if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0)
croak("Permission denied"); /* testing full pathname here */
+#if (defined(BSD) && (BSD >= 199306))
+#ifdef IAMSUID
+ {
+ struct statfs stfs;
+ {
+ struct statfs stfs;
+
+ if (fstatfs(fileno(rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",origfilename);
+ if (fstatfs(fileno(PL_rsfp),&stfs) < 0)
+ croak("Can't statfs filesystem of script \"%s\"",PL_origfilename);
+
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+ if (stfs.f_flags & MNT_NOSUID)
+ croak("Permission denied");
+ }
+#endif /* IAMSUID */
+#endif /* BSD */
+
if (tmpstatbuf.st_dev != statbuf.st_dev ||
tmpstatbuf.st_ino != statbuf.st_ino) {
(void)PerlIO_close(rsfp);
if (tmpstatbuf.st_dev != PL_statbuf.st_dev ||
tmpstatbuf.st_ino != PL_statbuf.st_ino) {
(void)PerlIO_close(PL_rsfp);

View File

@ -1,6 +1,6 @@
--- makedepend.SH.orig Mon Sep 8 21:27:36 1997
+++ makedepend.SH Mon Sep 8 21:29:04 1997
@@ -60,6 +60,7 @@
--- makedepend.SH.ORIG Fri Jul 24 06:00:58 1998
+++ makedepend.SH Thu Jul 30 17:08:37 1998
@@ -67,6 +67,7 @@
# to be out of date. I don't know if OS/2 has touch, so do this:
case "$osname" in
os2) ;;

File diff suppressed because it is too large Load Diff