In perl.git, the branch maint-5.12 has been updated <http://perl5.git.perl.org/perl.git/commitdiff/e58381a4c9c50d292392b03cc9c8e13d11a1ae11?hp=e8de0e047a195ed52b1db6cf471f6a356bdf881c>
- Log ----------------------------------------------------------------- commit e58381a4c9c50d292392b03cc9c8e13d11a1ae11 Author: Rafael Garcia-Suarez <[email protected]> Date: Thu Jun 3 16:11:26 2010 +0200 Do not advertise Math::TrulyRandom, which hasn't been updated since 1996 (Spotted by Giel Goudsmit) M pod/perlfunc.pod commit 0d9dffac0a3cc1d59def3e0b8e2bab26e4db9940 Author: Slaven Rezic <[email protected]> Date: Thu Apr 29 16:04:35 2010 +0200 Document IO::Socket getsockopt and setsockopt get/setsockopt are not explicitly documented. Note that the documented sockopt() method is a wrapper around get/setsockopt, but does not cover all cases because of the hardcoded level (= SOL_SOCKET). M dist/IO/lib/IO/Socket.pm commit 10df556ba4763ae0fb256a317def6c0061fdb18c Author: Ricardo Signes <[email protected]> Date: Thu May 20 10:14:39 2010 -0400 update Ricardo Signes's email M Porting/release_schedule.pod commit 6d6840970be880d4a477b61fbe64d44f3006edf2 Author: Rafael Garcia-Suarez <[email protected]> Date: Wed May 19 20:36:12 2010 +0200 Do not try to load a feature bundle when doing "no VERSION" M pp_ctl.c ----------------------------------------------------------------------- Summary of changes: Porting/release_schedule.pod | 2 +- dist/IO/lib/IO/Socket.pm | 10 ++++++++++ pod/perlfunc.pod | 4 ++-- pp_ctl.c | 3 ++- 4 files changed, 15 insertions(+), 4 deletions(-) diff --git a/Porting/release_schedule.pod b/Porting/release_schedule.pod index c02bcc4..5c2c738 100644 --- a/Porting/release_schedule.pod +++ b/Porting/release_schedule.pod @@ -40,7 +40,7 @@ and can't find a substitute amongst this list, mail p5p. Jesse Vincent <F<[email protected]>> Leon Brocard <F<[email protected]>> Yves Orton <F<[email protected]>> -Ricardo Signes <F<[email protected]>> +Ricardo Signes <F<[email protected]>> Steve Hay <F<[email protected]>> Ask Bjørn Hansen <F<[email protected]>> David Golden <F<[email protected]>> diff --git a/dist/IO/lib/IO/Socket.pm b/dist/IO/lib/IO/Socket.pm index 9938c78..6d4f6ab 100644 --- a/dist/IO/lib/IO/Socket.pm +++ b/dist/IO/lib/IO/Socket.pm @@ -493,6 +493,16 @@ an AF_INET socket the value of &AF_INET will be returned. Unified method to both set and get options in the SOL_SOCKET level. If called with one argument then getsockopt is called, otherwise setsockopt is called. +=item getsockopt(LEVEL, OPT) + +Get option associated with the socket. Other levels than SOL_SOCKET +may be specified here. + +=item setsockopt(LEVEL, OPT, VAL) + +Set option associated with the socket. Other levels than SOL_SOCKET +may be specified here. + =item socktype Returns the numerical number for the socket type. For example, for diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index 5e89035..aca8cfd 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -6181,8 +6181,8 @@ example: srand (time ^ $$ ^ unpack "%L*", `ps axww | gzip -f`); -If you're particularly concerned with this, see the C<Math::TrulyRandom> -module in CPAN. +If you're particularly concerned with this, search the CPAN for +random number generator modules instead of rolling out your own. Frequently called programs (like CGI scripts) that simply use diff --git a/pp_ctl.c b/pp_ctl.c index 72fe93d..61793dd 100644 --- a/pp_ctl.c +++ b/pp_ctl.c @@ -3317,8 +3317,9 @@ PP(pp_require) } } - /* We do this only with use, not require. */ + /* We do this only with "use", not "require" or "no". */ if (PL_compcv && + !(cUNOP->op_first->op_private & OPpCONST_NOVER) && /* If we request a version >= 5.9.5, load feature.pm with the * feature bundle that corresponds to the required version. */ vcmp(sv, sv_2mortal(upg_version(newSVnv(5.009005), FALSE))) >= 0) { -- Perl5 Master Repository
