Nicholas Clark [Sun, 1 May 2005 22:16:16 +0000]
Explode if anyone attempts to sv_upgrade PL_mess_sv.
Should this be a panic: ?
p4raw-id: //depot/perl@24357
H.Merijn Brand [Fri, 29 Apr 2005 15:32:17 +0000]
Put back INSTALL_PREFIX and INSTALL_PREFIX_EXP as they were
unintendedly removed by patch #23435
p4raw-id: //depot/perl@24355
Sébastien Aperghis-Tramoni [Thu, 28 Apr 2005 02:24:04 +0000]
Small patch to perlport.pod
Message-Id: <
D38E89F3-B77B-11D9-B91D-000502F3279F@free.fr>
p4raw-id: //depot/perl@24354
Jarkko Hietaniemi [Fri, 29 Apr 2005 11:02:01 +0000]
one cannot "static" exported functions
Message-ID: <
B356D8F434D20B40A8CEDAEC305A1F2453D705@esebe105.NOE.Nokia.com>
p4raw-id: //depot/perl@24353
Steve Hay [Fri, 29 Apr 2005 08:24:50 +0000]
Skip PL_sig_sv when PERL_IMPLICIT_CONTEXT is defined
(rather than when PERL_IMPLICIT_SYS is defined)
p4raw-id: //depot/perl@24352
Nicholas Clark [Thu, 28 Apr 2005 22:28:53 +0000]
Refactor Perl_sv_utf8_upgrade_flags to use SvPV_free
p4raw-id: //depot/perl@24351
Jarkko Hietaniemi [Wed, 27 Apr 2005 17:35:27 +0000]
(in blead) a missing const in a prototype
Message-ID: <
B356D8F434D20B40A8CEDAEC305A1F2453D6ED@esebe105.NOE.Nokia.com>
p4raw-id: //depot/perl@24350
Steve Hay [Thu, 28 Apr 2005 16:38:51 +0000]
Silence a compilation warning on Win32
p4raw-id: //depot/perl@24349
Nicholas Clark [Thu, 28 Apr 2005 11:22:15 +0000]
Add a new macro SvPV_free() which undoes OOK and free()s the PVX(),
becase there's a lot of code around that calls SvOOK_off(), memmov()s
the buffer, then promptly free()s it. So avoid the needless memmov().
p4raw-id: //depot/perl@24348
Steve Hay [Thu, 28 Apr 2005 11:13:55 +0000]
Remove temporary clean-up from Win32 makefiles
Change 22501 temporarily added some clean-up to the Win32 makefiles
which was only meant to stay until cpan rt #5616 was fixed. It is
now fixed (in EU-MM 6.22, which in turn has been in blead for a
while now), so these hacks are no longer required.
This change is also good for maint, which currently contains EU-MM
6.17, which didn't create the blibdirs.exists files in question
anyway.
p4raw-id: //depot/perl@24347
Rafael Garcia-Suarez [Thu, 28 Apr 2005 09:29:07 +0000]
Remove confusing punctuation
(spotted by David Rigaudiere)
p4raw-id: //depot/perl@24345
Nicholas Clark [Thu, 28 Apr 2005 09:29:06 +0000]
Calling sv_backoff() on something that's about to be free()d will
memmov() memory that's about to be freed. Seems wasteful.
p4raw-id: //depot/perl@24344
Steve Hay [Thu, 28 Apr 2005 08:44:28 +0000]
Fix perlsio_binmode() export breakage caused by change #24338
Define and export perlsio_binmode() based on the same condition,
namely, that USE_PERLIO is defined and USE_SFIO is not.
p4raw-link: @24338 on //depot/perl:
de009b76d60bdeb88f1d812ac755ae225805a071
p4raw-id: //depot/perl@24341
Nicholas Clark [Thu, 28 Apr 2005 08:34:57 +0000]
The if() clause is the wrong way round, so OOK can never be true in
this case. Given that OOK is never undone, we could never have been
correctly upgrading a PV with OOK to HV or AV. I believe that only
SVt_NULL is the only type ever upgraded to HV or AV.
p4raw-id: //depot/perl@24340
Rafael Garcia-Suarez [Wed, 27 Apr 2005 20:24:30 +0000]
A couple of warning fixes by Gisle
p4raw-id: //depot/perl@24339
Andy Lester [Wed, 27 Apr 2005 10:02:43 +0000]
perlio-two.patch: More warnings squashed, more consts
Message-ID: <
20050427150243.GA21883@petdance.com>
p4raw-id: //depot/perl@24338
Steve Hay [Wed, 27 Apr 2005 08:35:40 +0000]
Win32 MM test fix
From: Michael G Schwern <schwern@pobox.com>
Date: Mon, 18 Apr 2005 14:30:19 -0700
Message-ID: <
20050418213019.GA15797@windhund.schwern.org>
Subject: Re: Win32 MM test fix
From: demerphq <demerphq@gmail.com>
Date: Tue, 19 Apr 2005 00:57:59 +0200
Message-ID: <
9b18b31105041815573e10dc10@mail.gmail.com>
p4raw-id: //depot/perl@24334
Andy Lester [Fri, 22 Apr 2005 17:39:47 +0000]
XS() __attribute__
Message-ID: <
20050422223947.GA4681@petdance.com>
p4raw-id: //depot/perl@24333
Andy Lester [Mon, 25 Apr 2005 17:56:51 +0000]
Re: [PATCH] pp_pack.c redux, to work w/Jarkko's recent patches
Message-ID: <
20050425225651.GB17271@petdance.com>
p4raw-id: //depot/perl@24328
Rafael Garcia-Suarez [Tue, 26 Apr 2005 12:49:03 +0000]
Upgrade to CGI.pm 3.08
p4raw-id: //depot/perl@24326
H.Merijn Brand [Tue, 26 Apr 2005 11:28:42 +0000]
for AIX problems? RE: [PATCH] Symbian port of Perl
Date: Tue, 26 Apr 2005 12:22:12 +0300
From: <jarkko.hietaniemi@nokia.com>
Message-ID: <
B356D8F434D20B40A8CEDAEC305A1F2453D6CB@esebe105.NOE.Nokia.com>
From: Steve Hay <steve.hay@uk.radan.com>
Message-ID: <
426E11A3.8070002@uk.radan.com>
p4raw-id: //depot/perl@24325
Steve Hay [Mon, 25 Apr 2005 13:09:57 +0000]
Update location to fetch dmake from in README.win32
Use the generic search.cpan.org URL so that the latest version is
always found
p4raw-id: //depot/perl@24321
Yves Orton [Sun, 24 Apr 2005 21:35:35 +0000]
mktables.lst and related stuff (was Re: [PATCH] Unicode 4.1.0)
Message-ID: <
9b18b31105042412352fcf2bc5@mail.gmail.com>
Date: Sun, 24 Apr 2005 21:35:35 +0200
p4raw-id: //depot/perl@24320
Steve Hay [Mon, 25 Apr 2005 11:05:24 +0000]
Provide $Config{libswanted_uselargefiles} on Win32
This fixes some test failures introduced by change 24271.
p4raw-id: //depot/perl@24319
Jarkko Hietaniemi [Sun, 24 Apr 2005 22:58:15 +0000]
combopatch
Message-ID: <
426BFA57.9060105@iki.fi>
p4raw-id: //depot/perl@24318
Rafael Garcia-Suarez [Mon, 25 Apr 2005 06:30:44 +0000]
Fix typo, noticed by Randal Schwartz
p4raw-id: //depot/perl@24317
Abhijit Menon-Sen [Mon, 25 Apr 2005 01:36:38 +0000]
Add STORABLE_attach hook (Adam Kennedy).
p4raw-id: //depot/perl@24316
Rafael Garcia-Suarez [Sun, 24 Apr 2005 15:25:18 +0000]
Add files missing in 24314
p4raw-id: //depot/perl@24315
Rafael Garcia-Suarez [Sun, 24 Apr 2005 13:26:50 +0000]
Upgrade to Test::Harness 2.48
p4raw-id: //depot/perl@24314
Steve Peters [Sat, 23 Apr 2005 22:37:48 +0000]
Add -Wdeclaration-after-statement to default flags for gcc 3+
Message-ID: <
20050424033748.GA23117@mccoy.peters.homeunix.org>
p4raw-id: //depot/perl@24313
Rafael Garcia-Suarez [Sun, 24 Apr 2005 11:48:24 +0000]
Add %patchlevel hash to Module::CoreList
p4raw-id: //depot/perl@24311
Craig A. Berry [Sat, 23 Apr 2005 18:25:52 +0000]
lib/Time/Local.t: time_t is unsigned on VMS
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <
426AD980.2010801@mac.com>
p4raw-id: //depot/perl@24310
Nicholas Clark [Sat, 23 Apr 2005 14:00:49 +0000]
Variable declarations can't come after statements in C89.
p4raw-id: //depot/perl@24309
Nicholas Clark [Sat, 23 Apr 2005 13:57:41 +0000]
Save state when auto-generating #ifdef PERL_CORE and PERL_CORE/PERL_EXT
reducing embed.h by about 10%.
p4raw-id: //depot/perl@24308
Steve Peters [Fri, 22 Apr 2005 22:36:03 +0000]
Fix for warnings in util.c/Perl_init_tm()
Message-Id: <
20050423033603.GA32547@mccoy.peters.homeunix.org>
localtime() can return null
p4raw-id: //depot/perl@24307
Nicholas Clark [Fri, 22 Apr 2005 21:40:21 +0000]
Convert to test.pl
p4raw-id: //depot/perl@24303
Craig A. Berry [Fri, 22 Apr 2005 11:23:29 +0000]
t/uni/class.t -- update VMS test skippage
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <
42692501.6090809@mac.com>
Date: Fri, 22 Apr 2005 11:23:29 -0500
p4raw-id: //depot/perl@24301
Rafael Garcia-Suarez [Fri, 22 Apr 2005 16:17:36 +0000]
Patch by Yves Orton to accept several options on the corelist(1)
command-line. Plus POD nits.
p4raw-id: //depot/perl@24300
Steve Hay [Fri, 22 Apr 2005 13:51:47 +0000]
Fix last remaining Win32 linker error following change 24271
(Supplied by Jarkko in a makedef.pl that was omitted from the
aforementioned change)
p4raw-id: //depot/perl@24290
Rafael Garcia-Suarez [Fri, 22 Apr 2005 12:42:37 +0000]
There's no point listing '-f' in --help output
when perl isn't built with USE_SITECUSTOMIZE, since it might
confuse users about $sitelib/sitecustomize.pl being sourced
at startup.
p4raw-id: //depot/perl@24287
Nicholas Clark [Fri, 22 Apr 2005 12:37:19 +0000]
For now, TODO the 2 tests that fail on 5.8.x
p4raw-id: //depot/perl@24286
Rafael Garcia-Suarez [Fri, 22 Apr 2005 12:34:14 +0000]
-A wasn't listed in the --help output
p4raw-id: //depot/perl@24284
Steve Hay [Fri, 22 Apr 2005 09:59:54 +0000]
Fix more Win32 linker errors following change 24271
This clears up problems with Perl_free_global_struct and
Perl_init_global_struct
p4raw-id: //depot/perl@24280
Andy Lester [Thu, 21 Apr 2005 11:33:13 +0000]
pp_pack.c warning quieting
Message-ID: <
20050421163313.GA20930@petdance.com>
p4raw-id: //depot/perl@24279
Steve Hay [Fri, 22 Apr 2005 08:59:58 +0000]
Fix Win32 linker errors following change 24271
This clears up "unresolved external" errors for the following symbols:
PL_watch_pvx
Perl_Gappctx_ptr
Perl_Gmmap_page_size_ptr
Perl_Gsig_defaulting_ptr
Perl_Gsig_handlers_initted_ptr
Perl_Gsig_ignoring_ptr
Perl_Gsig_sv_ptr
Perl_Gtimesbase_ptr
Perl_Gwatch_pvx_ptr
p4raw-id: //depot/perl@24278
Steve Peters [Thu, 21 Apr 2005 18:55:47 +0000]
bytecode.pl, bytecode.h, and sv.h fixes
Message-ID: <
20050421235547.GA12149@mccoy.peters.homeunix.org>
p4raw-id: //depot/perl@24277
Steve Hay [Fri, 22 Apr 2005 08:13:01 +0000]
Fix my_chsize() for systems having chsize(), broken by change #24271
p4raw-link: @24271 on //depot/perl:
27da23d53ccce622bc51822f59df8def79b4df95
p4raw-id: //depot/perl@24276
Dave Mitchell [Thu, 21 Apr 2005 21:30:11 +0000]
Sigh - really bump Text::Wrap version number this time.
p4raw-id: //depot/perl@24275
Dave Mitchell [Thu, 21 Apr 2005 21:27:15 +0000]
bump version number in Text::Wrap after change #24273
p4raw-link: @24273 on //depot/perl:
818675a5006285acc41be05f4d63d56374ea5eca
p4raw-id: //depot/perl@24274
Dave Mitchell [Thu, 21 Apr 2005 21:22:54 +0000]
[perl #34902] Text::Wrap::wrap() fails with non-space separator
p4raw-id: //depot/perl@24273
Jarkko Hietaniemi [Mon, 18 Apr 2005 13:18:30 +0000]
Symbian port of Perl
Message-ID: <
B356D8F434D20B40A8CEDAEC305A1F2453D653@esebe105.NOE.Nokia.com>
p4raw-id: //depot/perl@24271
Dave Mitchell [Thu, 21 Apr 2005 15:36:14 +0000]
[perl #34976] substr uses utf8 length cache incorrectly
p4raw-id: //depot/perl@24270
Andy Lester [Wed, 13 Apr 2005 21:06:01 +0000]
extra code in pp_concat, Take 2
Message-Id: <
20050414020601.GA21346@petdance.com>
add 'const', and remove extraneous code, from pp_concat
p4raw-id: //depot/perl@24269
David Dyck [Wed, 20 Apr 2005 16:35:55 +0000]
patch to [PATCH] Fix MGVTBL structures in perl.h (preprocessor
Message-Id: <Pine.LNX.4.62.
0504201627550.27786@dd.tc.fluke.com>
fix nits in change #24264:
some preprocessors don't like #ifdefs within a macro's args;
also removed duplicate semicolons from macro definitions.
p4raw-link: @24264 on //depot/perl:
4944113acaf494b4518ba93648e0a4276c34a175
p4raw-id: //depot/perl@24268
Dave Mitchell [Wed, 20 Apr 2005 23:35:54 +0000]
In change 24266 I failed to actually change anything. Sigh.
p4raw-id: //depot/perl@24267
Dave Mitchell [Wed, 20 Apr 2005 23:32:04 +0000]
change misleading syslog() example
p4raw-id: //depot/perl@24266
glasser@tang-eleven-seventy-nine.mit.edu [Wed, 20 Apr 2005 19:28:14 +0000]
[perl #35059] [PATCH] caller() skips frames (such as eval() frames) if $^P set
From: glasser@tang-eleven-seventy-nine.mit.edu (via RT) <perlbug-followup@perl.org>
Message-Id: <rt-3.0.11-35059-111134.0.
304511316819145@perl.org>
improved version of change 21842 that copes with glob DB::sub
existing but &DB::sub not existing.
p4raw-id: //depot/perl@24265
Andy Lester [Wed, 20 Apr 2005 15:09:24 +0000]
Fix MGVTBL structures in perl.h
Message-Id: <
20050420200923.GA3017@petdance.com>
The MGVTBL structures contain 7 function pointers, but only 5 were
getting initialized. Plus, there were repeated lists between
declaration and definition; add a macro to declare or define
all the global MGVTBLs as appropriate.
p4raw-id: //depot/perl@24264
Steve Peters [Wed, 20 Apr 2005 06:27:20 +0000]
Refactoring to Sv*_set() macros - patch #6
Message-ID: <
20050420112720.GA31042@mccoy.peters.homeunix.org>
Date: Wed, 20 Apr 2005 06:27:20 -0500
p4raw-id: //depot/perl@24260
Nicholas Clark [Wed, 20 Apr 2005 08:13:21 +0000]
Merge common code. Reduces object size by 1K on x86, 6K on PPC
p4raw-id: //depot/perl@24258
Dave Mitchell [Tue, 19 Apr 2005 23:47:38 +0000]
run regen_headers after addition of FOO_set() macros
p4raw-id: //depot/perl@24257
Andy Lester [Tue, 19 Apr 2005 11:38:44 +0000]
pad_compname_type(), takes care of a clunky macro
Message-Id: <
20050419163844.GA19747@petdance.com>
p4raw-id: //depot/perl@24256
Dave Mitchell [Tue, 19 Apr 2005 23:31:52 +0000]
DEBUG_LEAKING_SCALARS could use the value of a freed PL_op
p4raw-id: //depot/perl@24255
Nicholas Clark [Tue, 19 Apr 2005 21:53:38 +0000]
Don't set things to zero twice. Once is enough. (see also change 15255)
p4raw-id: //depot/perl@24254
Nicholas Clark [Tue, 19 Apr 2005 20:55:24 +0000]
Restore SvEND_set
p4raw-id: //depot/perl@24253
Nicholas Clark [Tue, 19 Apr 2005 20:07:49 +0000]
Force RVALUE macros when in PERL_DEBUG_COW
p4raw-id: //depot/perl@24252
Nicholas Clark [Tue, 19 Apr 2005 14:25:00 +0000]
Avoid generating thousands of UTF-8 warnings when testing under a
UTF-8 locale
p4raw-id: //depot/perl@24251
Rafael Garcia-Suarez [Tue, 19 Apr 2005 11:20:37 +0000]
Simplify PERL_DEBUG_PAD_ZERO so it continues to expand to
valid C code
p4raw-id: //depot/perl@24249
Steve Peters [Mon, 18 Apr 2005 19:09:25 +0000]
Refactoring to Sv*_set() macros - patch #5
Message-ID: <
20050419000925.GA21640@mccoy.peters.homeunix.org>
Date: Mon, 18 Apr 2005 19:09:25 -0500
p4raw-id: //depot/perl@24248
Dave Mitchell [Tue, 19 Apr 2005 01:38:54 +0000]
Add CLONE_SKIP() class method to allow individual classes to skip
cloning objects during thread creation
p4raw-id: //depot/perl@24247
Nicholas Clark [Mon, 18 Apr 2005 22:31:48 +0000]
PERL_DEBUG_COW for SvUVX and SvPVX
p4raw-id: //depot/perl@24246
Nicholas Clark [Mon, 18 Apr 2005 21:58:22 +0000]
SvPV_renew also calls SvLEN_set
Add SvPV_shrink_to_cur(sv) to call SvPV_renew with SvCUR(sv)+1.
For Ponie this can be a single call into the PMC
p4raw-id: //depot/perl@24245
Nicholas Clark [Mon, 18 Apr 2005 20:37:13 +0000]
Replace Renew(SvPVX(...)...) with SvPV_renew, which avoids an LVALUE
SvPVX
p4raw-id: //depot/perl@24244
Nicholas Clark [Mon, 18 Apr 2005 19:50:12 +0000]
A more efficient way of expressing the MALLOC_WRAP conditional compile.
p4raw-id: //depot/perl@24243
Steve Hay [Mon, 18 Apr 2005 16:04:20 +0000]
Fix bug #33664: allow for transport providers with protocol == 0
(This indicates that any protocol may be used, so don't bother checking
that the requested protocol matches in this case.)
p4raw-id: //depot/perl@24242
Nicholas Clark [Mon, 18 Apr 2005 15:23:45 +0000]
Refactor the odd-one-out code before a Renew(SvPVX(...)...)
p4raw-id: //depot/perl@24241
Nicholas Clark [Mon, 18 Apr 2005 14:15:52 +0000]
Two more uses of lvalue SvIVX()
p4raw-id: //depot/perl@24240
Steve Peters [Sat, 16 Apr 2005 11:05:02 +0000]
Refactoring to Sv*_set() macros - patch #4
Message-ID: <
20050416160502.GA26957@mccoy.peters.homeunix.org>
plus fix to Perl_rvpv_dup assigning to an RV with SvPVX
p4raw-id: //depot/perl@24239
Rafael Garcia-Suarez [Fri, 15 Apr 2005 13:16:29 +0000]
Update the outdated info in "Minimizing the Perl installation"
p4raw-id: //depot/perl@24238
bstrand@switchmanagement.com [Tue, 12 Apr 2005 19:12:58 +0000]
Fix for:
[perl #34934] perl 5.8.5 on x86 and x86-64 hang at compile-time
From: bstrand@switchmanagement.com (via RT) <perlbug-followup@perl.org>
Message-ID: <rt-3.0.11-34934-110595.15.
9181274318682@perl.org>
This syntax error now produces a panic message.
p4raw-id: //depot/perl@24237
Andy Lester [Wed, 13 Apr 2005 10:06:47 +0000]
Removing yydestruct from perly.c
Message-ID: <
20050413150647.GA13464@petdance.com>
p4raw-id: //depot/perl@24236
H.Merijn Brand [Wed, 13 Apr 2005 14:51:00 +0000]
Mandrakesoft is now Mandriva
p4raw-id: //depot/perl@24235
H.Merijn Brand [Wed, 13 Apr 2005 14:41:20 +0000]
H.Merijn changed e-mail
p4raw-id: //depot/perl@24234
Robin Barker [Tue, 12 Apr 2005 18:53:32 +0000]
-Wformat
Message-ID: <
533D273D4014D411AB1D00062938C4D90849C634@hotel.npl.co.uk>
p4raw-id: //depot/perl@24233
Rafael Garcia-Suarez [Wed, 13 Apr 2005 07:24:07 +0000]
Upgrade to ExtUtils::MakeMaker 6.28
p4raw-id: //depot/perl@24232
Rafael Garcia-Suarez [Tue, 12 Apr 2005 15:30:23 +0000]
Upgrade to Encode 2.0902
p4raw-id: //depot/perl@24231
Nicholas Clark [Tue, 12 Apr 2005 11:24:49 +0000]
Don't PERL_HASH(SvUVX(...)...) as it's actually a set.
Plus add an editor block
p4raw-id: //depot/perl@24230
Steve Peters [Sun, 10 Apr 2005 21:37:36 +0000]
Refactoring to Sv*_set() macros - patch #3
Message-ID: <
20050411023736.GB9355@mccoy.peters.homeunix.org>
(with correction to SvUV_set)
p4raw-id: //depot/perl@24229
Nicholas Clark [Mon, 11 Apr 2005 14:53:38 +0000]
Avoid taking a reference to SvIVX and putting that address on the
save stack
p4raw-id: //depot/perl@24228
Steve Hay [Mon, 11 Apr 2005 10:39:59 +0000]
Support d_libm_lib_version for Win32 (see change 24217)
p4raw-id: //depot/perl@24227
H.Merijn Brand [Mon, 11 Apr 2005 10:09:06 +0000]
Out of sync metaunit caused the erroneous return of the
removed d_sitecustomize. Mea Culpa.
p4raw-id: //depot/perl@24226
Steve Hay [Mon, 11 Apr 2005 09:39:40 +0000]
Disable I18N::Langinfo for Win32 since nl_langinfo() isn't available
p4raw-id: //depot/perl@24225
Hernan Perez Masci [Fri, 8 Apr 2005 15:28:28 +0000]
perlfunc.pod: incomplete select description
Message-Id: <
200504081528.28307.hmasci@uolsinectis.com.ar>
p4raw-id: //depot/perl@24224
Rafael Garcia-Suarez [Mon, 11 Apr 2005 09:11:53 +0000]
Make the four-argument form of select() return undef
instead of -1 on error.
p4raw-id: //depot/perl@24223
Rafael Garcia-Suarez [Mon, 11 Apr 2005 07:02:59 +0000]
Make Win32 build (and clean) I18::Langinfo and Math::BigInt::FastCalc
p4raw-id: //depot/perl@24222
Abe Timmerman [Sun, 10 Apr 2005 22:19:28 +0000]
Re: New Configure functionality
Message-Id: <
200504102219.29024.abe@ztreet.demon.nl>
p4raw-id: //depot/perl@24221
Rafael Garcia-Suarez [Sun, 10 Apr 2005 20:03:59 +0000]
POD typo.
p4raw-id: //depot/perl@24220
Rafael Garcia-Suarez [Sun, 10 Apr 2005 19:49:49 +0000]
Module::CoreList: Data from Sebastien Aperghis-Tramoni for perl
5.00{0,1,2}. Upgrade version number.
p4raw-id: //depot/perl@24219
H.Merijn Brand [Sun, 10 Apr 2005 18:00:05 +0000]
Sorting still is a mess. This is better.
p4raw-id: //depot/perl@24218
H.Merijn Brand [Sun, 10 Apr 2005 17:08:36 +0000]
Configure now probes for _LIB_VERSION support in math.h/libm
LIBM_LIB_VERSION is defined if it does
p4raw-id: //depot/perl@24217