Nicholas Clark [Fri, 18 Jan 2008 18:00:56 +0000]
Avoid an unused argument in S_sv_2iuv_non_preserve() by using
conditional compilation to only pass it in if it's needed.
p4raw-id: //depot/perl@33004
Nicholas Clark [Fri, 18 Jan 2008 16:40:48 +0000]
Nick's a muppet - "all" needs to remain the first real target in the
Makefile. Do not be distracted by suffix rules above.
p4raw-id: //depot/perl@33003
Nicholas Clark [Fri, 18 Jan 2008 16:11:35 +0000]
Don't create local variables validarg and fdscript if they aren't going
to be used.
p4raw-id: //depot/perl@33002
Nicholas Clark [Fri, 18 Jan 2008 15:28:09 +0000]
The suidscript argument to S_forbid_setid(), S_open_script() and
S_validate_suid() is actually just a boolean. So make it so.
p4raw-id: //depot/perl@33001
Nicholas Clark [Fri, 18 Jan 2008 14:27:36 +0000]
Eliminate all PERL_UNUSED_ARG()s in S_validate_suid() by changing its
prototype depending on the compile time options. In turn, this finds
things that are unused in its callers.
p4raw-id: //depot/perl@33000
Nicholas Clark [Fri, 18 Jan 2008 14:13:30 +0000]
A target for sperl.i
p4raw-id: //depot/perl@32999
Nicholas Clark [Fri, 18 Jan 2008 11:01:15 +0000]
Change 32997 missed one conditionally unused argument.
p4raw-id: //depot/perl@32998
Nicholas Clark [Fri, 18 Jan 2008 09:40:02 +0000]
Collect all the S_validate_suid() unused argument logic in one place.
p4raw-id: //depot/perl@32997
Nicholas Clark [Fri, 18 Jan 2008 09:27:13 +0000]
Remove commented out declaration from S_validate_suid()
p4raw-id: //depot/perl@32996
Rafael Garcia-Suarez [Fri, 18 Jan 2008 09:18:58 +0000]
New tests for new ops. Most of them are TODO
p4raw-id: //depot/perl@32995
Nicholas Clark [Fri, 18 Jan 2008 09:09:56 +0000]
Remove commented out code from S_validate_suid()
p4raw-id: //depot/perl@32994
Nicholas Clark [Fri, 18 Jan 2008 08:20:13 +0000]
Add Weed out needless PERL_UNUSED_ARG to perltodo. It's a good
"cage cleaner" task.
p4raw-id: //depot/perl@32993
Nicholas Clark [Thu, 17 Jan 2008 14:23:48 +0000]
warn if ++ or -- are unable to change the value because it's beyond
the limit of representation in NVs, using a new warnings category
"imprecision".
p4raw-id: //depot/perl@32990
Steve Peters [Thu, 17 Jan 2008 12:24:21 +0000]
Upgrade to Math-Complex-1.47
p4raw-id: //depot/perl@32989
Nicholas Clark [Thu, 17 Jan 2008 11:31:38 +0000]
Generate the warnings masks programatically.
Get the correct line number when reporting errors from &check_bits.
p4raw-id: //depot/perl@32988
Nicholas Clark [Thu, 17 Jan 2008 08:17:11 +0000]
Add a diagram for the 5.11 SV class structure, including B::REGEXP.
p4raw-id: //depot/perl@32987
Abigail [Wed, 16 Jan 2008 18:46:17 +0000]
Don't ask about a module when using -ok
Message-ID: <
20080116174617.GA30446@abigail.be>
Date: Wed, 16 Jan 2008 18:46:17 +0100
p4raw-id: //depot/perl@32986
Rafael Garcia-Suarez [Wed, 16 Jan 2008 12:12:10 +0000]
A couple of POD fixes by Steven Schubiger
p4raw-id: //depot/perl@32982
Steve Peters [Tue, 15 Jan 2008 19:20:53 +0000]
Thanks to Sébstien Aperghis-Tramoni's suggestion, updated version
numbers in a few extra files and regenerated uconfig.h.
p4raw-id: //depot/perl@32981
Mashrab Kuvatov [Tue, 15 Jan 2008 15:17:42 +0000]
Boolean priority bug, found by Mashrab Kuvatov:
Subject: Re: [perl #49646] perlbug AutoReply: open ':locale' does not work under locale with the modifier
Message-Id: <
200801151517.46296.kmashrab@uni-bremen.de>
p4raw-id: //depot/perl@32980
Jerry D. Hedden [Mon, 14 Jan 2008 19:56:48 +0000]
Fix range operator
From: "Jerry D. Hedden" <jdhedden@cpan.org>
Message-ID: <
1ff86f510801141656i325ac69ev8a0af47f9fe72a1e@mail.gmail.com>
p4raw-id: //depot/perl@32979
Robin Barker [Sat, 22 Dec 2007 00:56:18 +0000]
consting IO.xs
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <
46A0F33545E63740BC7563DE59CA9C6D0939A1@exchsvr2.npl.ad.local>
p4raw-id: //depot/perl@32978
Rafael Garcia-Suarez [Mon, 14 Jan 2008 22:48:46 +0000]
When parsing LC_ALL or LANG to get the locale's encoding, ignore
whatever is after the @, since that's a modifier, not an encoding.
p4raw-id: //depot/perl@32977
Robin Barker [Mon, 14 Jan 2008 20:39:35 +0000]
consting
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <
46A0F33545E63740BC7563DE59CA9C6D0939CA@exchsvr2.npl.ad.local>
p4raw-id: //depot/perl@32976
H.Merijn Brand [Mon, 14 Jan 2008 16:37:08 +0000]
Intermediate update/regen in cleanup process, dtrace support
is now backported
p4raw-id: //depot/perl@32974
Nicholas Clark [Sun, 13 Jan 2008 20:58:56 +0000]
Re-order so that the !SvOK() case is last (which should be rare)
Remove the FIXME comment as I had already fixed it.
p4raw-id: //depot/perl@32971
Steve Peters [Sun, 13 Jan 2008 15:28:30 +0000]
Upgrade to Math-Complex-1.44
p4raw-id: //depot/perl@32970
Nicholas Clark [Sat, 12 Jan 2008 22:20:39 +0000]
For 5.12: saner behaviour for `length`
(Make C<length undef> return undef).
Patch mostly by Rafael, with some fine tuning by me.
p4raw-id: //depot/perl@32969
Nicholas Clark [Sat, 12 Jan 2008 21:57:06 +0000]
Fix bug whereby length on a tied scalar that returned a UTF-8 value
would not be correct the first time. (And for the more pathological
case, would be incorrect if the UTF-8-ness of the returned value
changed.)
p4raw-id: //depot/perl@32968
Andy Armstrong [Sat, 12 Jan 2008 20:27:46 +0000]
Re: [PATCH] Stop DTrace config option looping in non-interactive mode
Message-Id: <
4C6BD298-5CD3-49EA-8FED-4A6DA24BFA7B@hexten.net>
Date: Sat, 12 Jan 2008 20:27:46 +0000
p4raw-id: //depot/perl@32967
Jarkko Hietaniemi [Sat, 12 Jan 2008 03:27:10 +0000]
tru64: poison stack, write protect string constants
Message-Id: <
200801120127.m0C1RAZ6088857@kosh.hut.fi>
p4raw-id: //depot/perl@32966
Craig A. Berry [Sat, 12 Jan 2008 01:07:54 +0000]
Nit disabling dtrace on VMS (2 single quotes inside double quotes
causes symbol interpolation in DCL).
p4raw-id: //depot/perl@32965
Craig A. Berry [Sat, 12 Jan 2008 01:01:45 +0000]
Don't quote a whitespace-containing ABSPERL when the whitespace
means it is a command with parameter(s).
p4raw-id: //depot/perl@32964
Andy Armstrong [Fri, 11 Jan 2008 19:34:25 +0000]
sh doesn't know about !
Message-Id: <
7EC45604-54BE-4738-90B2-7AC5C6D17026@hexten.net>
Date: Fri, 11 Jan 2008 19:34:25 +0000
p4raw-id: //depot/perl@32963
Nicholas Clark [Fri, 11 Jan 2008 20:27:23 +0000]
Well, I know *something* passed make test from a clean build before
change 32961, and I thought that it was the right thing, but I guess
not. It should have read like this.
p4raw-id: //depot/perl@32962
Nicholas Clark [Fri, 11 Jan 2008 19:01:39 +0000]
assert that these are the regexps you were looking for.
(at least for the most commonly used macros).
Remove the duplicate definition of RX_SUBBEG(), which I was sure I'd
done earlier.
p4raw-id: //depot/perl@32961
Nicholas Clark [Fri, 11 Jan 2008 18:03:18 +0000]
__DATE__ and __TIME__ are both string literals, so we can concatentate
them, rather than formating them via %s.
p4raw-id: //depot/perl@32960
Nicholas Clark [Fri, 11 Jan 2008 17:00:59 +0000]
Pack the recycled pad offsets into an SV at PL_regex_pad[0]. This will
use less memory than an AV.
p4raw-id: //depot/perl@32959
Nicholas Clark [Fri, 11 Jan 2008 16:42:11 +0000]
Remove C variables (and a parameter!) now unused since -P bit the dust.
p4raw-id: //depot/perl@32958
Nicholas Clark [Fri, 11 Jan 2008 15:04:51 +0000]
Note the U8 sized space created by removing -P, and check that it is
now an illegal command line flag.
p4raw-id: //depot/perl@32956
Rafael Garcia-Suarez [Fri, 11 Jan 2008 13:59:32 +0000]
Rename PERL_MAX_SUB_DEPTH to PERL_SUB_DEPTH_WARN, per Tim Bunce's
suggestion
p4raw-id: //depot/perl@32955
Rafael Garcia-Suarez [Fri, 11 Jan 2008 13:55:07 +0000]
Remove the -P switch
p4raw-id: //depot/perl@32954
Andy Armstrong [Thu, 10 Jan 2008 22:20:52 +0000]
Add dtrace support
Message-Id: <
F4AC553F-7C7F-49C3-98C2-E04681E1004F@hexten.net>
with fixups as discussed on list, plus adding usedtrace to Glossary,
plus propagating all the new config variables everywhere.
(Was there an automatic way to do that? I did it with emacs macros)
p4raw-id: //depot/perl@32953
Nicholas Clark [Fri, 11 Jan 2008 13:22:35 +0000]
Remove PM_GETRE_SAFE and PM_SETRE_SAFE as nothing uses them.
p4raw-id: //depot/perl@32952
Nicholas Clark [Fri, 11 Jan 2008 12:47:57 +0000]
Remove code that protected pp_qr against REGEXPs going away during
global destruction whilst they were stored via true references in
PL_regex_padav. It won't happen again (unless someone manages to get
a reference to an OP's regexp, which is also a risk in 5.10 and 5.8)
p4raw-id: //depot/perl@32951
Nicholas Clark [Fri, 11 Jan 2008 12:14:04 +0000]
REGEXPs are now stored directly in PL_regex_padav, rather than
indirectly via RVs. This saves memory, and removes 1 level of pointer
indirection.
p4raw-id: //depot/perl@32950
Rafael Garcia-Suarez [Fri, 11 Jan 2008 11:31:34 +0000]
Introduce macro PERL_MAX_SUB_DEPTH
p4raw-id: //depot/perl@32949
Rick Delaney [Wed, 9 Jan 2008 13:36:55 +0000]
Re: [perl #49564] Re: MRO and av_clear
Message-ID: <
20080109183655.GB11282@bort.ca>
p4raw-id: //depot/perl@32948
Robin Barker [Thu, 10 Jan 2008 18:50:12 +0000]
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <
46A0F33545E63740BC7563DE59CA9C6D0939C3@exchsvr2.npl.ad.local>
More consting.
p4raw-id: //depot/perl@32947
Robin Barker [Thu, 10 Jan 2008 18:48:04 +0000]
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <
46A0F33545E63740BC7563DE59CA9C6D0939C2@exchsvr2.npl.ad.local>
p4raw-id: //depot/perl@32946
Paul Johnson [Thu, 10 Jan 2008 23:44:20 +0000]
[DOC PATCH] was Re: things deprecated for removal in 5.12
Message-ID: <
20080110224420.GB29292@pjcj.net>
p4raw-id: //depot/perl@32945
Nicholas Clark [Thu, 10 Jan 2008 23:55:40 +0000]
Better descriptions for PL_regex_pad and PL_regex_padav.
p4raw-id: //depot/perl@32944
Nicholas Clark [Thu, 10 Jan 2008 23:54:22 +0000]
Real regexps are stored via RVs, IVs can only mean spare slots. Hence
it's safe to make the scalar undefined, rather than calling out to
write a 0 that would also be interpreted as a NULL pointer.
p4raw-id: //depot/perl@32943
Nicholas Clark [Thu, 10 Jan 2008 23:32:27 +0000]
Change 32899 missed undoing the reference count increase when the SV
is popped off the AV.
"There's Something Wrong with our Bloody Leak Checking Today", as
Beattie didn't put it. It seems that we really can't check for leaking
scalars in perl_destruct, because we do our damndest to free them
brute force, rather than by undefining the symbol table and seeing
what sticks around.
p4raw-id: //depot/perl@32942
Nicholas Clark [Thu, 10 Jan 2008 22:38:10 +0000]
Reverse the TODOs on t/op/regexp_qr_embed_thr.t - they all pass now.
p4raw-id: //depot/perl@32941
Nicholas Clark [Thu, 10 Jan 2008 22:37:20 +0000]
Un-TODO (and un-SKIP) tests in t/op/pat_thr.t that now pass.
Some TODOs still remain. Bounties?
p4raw-id: //depot/perl@32940
Nicholas Clark [Thu, 10 Jan 2008 22:06:53 +0000]
It seems that you don't need to reference count PL_reg_curpm without
ithreads, so don't waste time doing it there.
p4raw-id: //depot/perl@32939
Nicholas Clark [Thu, 10 Jan 2008 21:16:01 +0000]
The correct solution is to reference count the regexp in PL_reg_curpm,
rather than put in lots of hacks to work round not reference counting
it.
p4raw-id: //depot/perl@32938
Nicholas Clark [Thu, 10 Jan 2008 21:15:02 +0000]
Ensure DEBUG_LEAKING_SCALARS_ABORT can't be circumvented by fatal
warnings. Add an abort() if you try to dup a freed scalar.
p4raw-id: //depot/perl@32937
Nicholas Clark [Thu, 10 Jan 2008 17:27:39 +0000]
Fix bug picked up by printf format warnings - a cast is needed where
UV is larger than U32 for dumping leaking scalars.
p4raw-id: //depot/perl@32935
Ævar Arnfjörð Bjarmason [Wed, 9 Jan 2008 21:05:15 +0000]
Move the reg_stringify logic to Perl_sv_2pv_flags
Message-ID: <86zlveaewk.fsf@cpan.org>
with two corrections.
Plus remove reg_stringify from embed.fnc and regen.
p4raw-id: //depot/perl@32934
Dave Mitchell [Wed, 9 Jan 2008 23:57:36 +0000]
seen_eval regex field wasn't getting cloned
p4raw-id: //depot/perl@32933
Nicholas Clark [Wed, 9 Jan 2008 23:26:14 +0000]
Fix the bug introduced by the bug fix of change 30755.
(Certain regexps could SEGV if cloned).
p4raw-id: //depot/perl@32932
Nicholas Clark [Wed, 9 Jan 2008 22:42:04 +0000]
Variants of several regression tests that run the actul tests inside
a new thread, to test ithread's cloning, particularly of regexps.
p4raw-id: //depot/perl@32931
Nicholas Clark [Wed, 9 Jan 2008 22:36:21 +0000]
grep the MANIFEST to avoid having hard coded numbers in readdir.t
p4raw-id: //depot/perl@32930
Steve Peters [Wed, 9 Jan 2008 21:50:25 +0000]
Upgrade to Math-Complex-1.43
p4raw-id: //depot/perl@32929
Steve Peters [Wed, 9 Jan 2008 21:18:39 +0000]
Only code paths in hv_store either XSRETURN_NO or XSRETURN_YES.
Change the prototype to return void, remove the output to RETVAL
(which isn't set anyway), and fix a typo in the code.
p4raw-id: //depot/perl@32928
H.Merijn Brand [Wed, 9 Jan 2008 21:05:38 +0000]
Intermediate re-gen for AndyA's dtrace work. More to come
p4raw-id: //depot/perl@32927
Marcus Holland-Moritz [Wed, 9 Jan 2008 19:58:11 +0000]
Re: [PATCH] Exclude .svn and _darcs from IPC::SysV's Makefile.PL libscan
Message-ID: <
20080109195811.2c5353e5@r2d2>
Make libscan() in IPC::SysV's Makefile.PL inherit EU::MM's
libscan() behaviour.
p4raw-id: //depot/perl@32926
Steve Hay [Wed, 9 Jan 2008 17:59:11 +0000]
Fix prototype in regexp code following #32851, and regen
p4raw-id: //depot/perl@32925
Rafael Garcia-Suarez [Wed, 9 Jan 2008 16:52:36 +0000]
Revert change #32920, since it was solved another way by #32890.
p4raw-link: @32920 on //depot/perl:
e3dd4663a7a9c4d106a591d5b1511f7c9d1bfa1e
p4raw-id: //depot/perl@32922
Marcus Holland-Moritz [Thu, 3 Jan 2008 01:29:35 +0000]
refactor PL_opargs generation in opcode.pl and fix helem
Message-ID: <
20080103012935.759bda90@r2d2>
p4raw-id: //depot/perl@32921
Robin Barker [Mon, 7 Jan 2008 14:10:30 +0000]
RE: compile warnings w/ PM_SETRE and ReREFCNT_inc
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <
46A0F33545E63740BC7563DE59CA9C6D0939AE@exchsvr2.npl.ad.local>
p4raw-id: //depot/perl@32920
Nicholas Clark [Wed, 9 Jan 2008 15:34:42 +0000]
Add DEBUG_LEAKING_SCALARS_ABORT, to call abort() if any scalars leak,
or are freed too many times.
p4raw-id: //depot/perl@32918
Rafael Garcia-Suarez [Wed, 9 Jan 2008 13:16:34 +0000]
Add a few =cuts (so configpm is displayed mostly correctly
by perldoc or by search.cpan.org)
p4raw-id: //depot/perl@32916
Rafael Garcia-Suarez [Wed, 9 Jan 2008 12:33:27 +0000]
Fix leak introduced by change #32873, thanks to Nicholas
p4raw-link: @32873 on //depot/perl:
3a28f3fb1bfd44e4e3dfe6842af867c8c1c9de28
p4raw-id: //depot/perl@32915
Nicholas Clark [Wed, 9 Jan 2008 11:47:12 +0000]
1e4 isn't large enough with 16 byte long doubles (at least on x86_64).
However, 1e5 does take us "to infinity and beyond"
(Plus use cmp_ok, for better diagnostics)
p4raw-id: //depot/perl@32914
Nicholas Clark [Wed, 9 Jan 2008 11:40:12 +0000]
Change 32899 missed the other double-reference count.
p4raw-id: //depot/perl@32913
Nicholas Clark [Wed, 9 Jan 2008 11:34:41 +0000]
newSV() + sv_upgrade() => newSV_type()
p4raw-id: //depot/perl@32912
Jerry D. Hedden [Tue, 8 Jan 2008 15:01:02 +0000]
Move re::regexp_pattern to universal.c
From: "Jerry D. Hedden" <jdhedden@cpan.org>
Message-ID: <
1ff86f510801081201q5c36f055re6165ebfe8876c2e@mail.gmail.com>
p4raw-id: //depot/perl@32911
Rafael Garcia-Suarez [Wed, 9 Jan 2008 10:11:10 +0000]
Remove the warning "v-string in require/use non portable"
p4raw-id: //depot/perl@32910
Florian Ragwitz [Tue, 8 Jan 2008 19:56:47 +0000]
B::Deparse fixes for implicit smartmatching in given/when
Message-ID: <
20080108185647.GD11813@perldition.org>
p4raw-id: //depot/perl@32909
Steve Peters [Wed, 9 Jan 2008 02:36:33 +0000]
Upgrade to Math-Complex-1.42
p4raw-id: //depot/perl@32908
Steve Peters [Wed, 9 Jan 2008 02:29:48 +0000]
Upgrade to Module-Load-Conditional-0.24
p4raw-id: //depot/perl@32907
Dave Mitchell [Wed, 9 Jan 2008 01:50:38 +0000]
change #31447 was wrong. Really handle cloning a stale lexical var
p4raw-link: @31447 on //depot/perl:
efa785391fea9e6aff4c999b27ad62b7d8f9ea99
p4raw-id: //depot/perl@32906
Max Maischein [Mon, 7 Jan 2008 20:48:04 +0000]
[patch] [Win32] Make Perl build on Win32 when the path contains whitespace
Message-ID: <
478281F4.9000202@cpan.org>
p4raw-id: //depot/perl@32905
Gabor Szabo [Tue, 8 Jan 2008 22:07:54 +0000]
Re: [PATCH] docs more open() and $_ related entries
From: "Gabor Szabo" <szabgab@gmail.com>
Message-ID: <
d8a74af10801081207q2637419dy59f1a3600bcc4a76@mail.gmail.com>
p4raw-id: //depot/perl@32904
Steffen Müller [Fri, 30 Nov 2007 23:02:03 +0000]
AutoLoader: Remove AutoLoader::can
Message-ID: <
20071130220203.26939.qmail@lists.develooper.com>
p4raw-id: //depot/perl@32903
Nicholas Clark [Tue, 8 Jan 2008 17:55:41 +0000]
With regexps stored as real RVs, we can eliminate SvREPADTMP().
Exterminate! Exterminate! Exterminate!
p4raw-id: //depot/perl@32902
Nicholas Clark [Tue, 8 Jan 2008 17:35:19 +0000]
PL_regex_padav can simply be dup()ed. This is surprisingly satisfying.
p4raw-id: //depot/perl@32901
Nicholas Clark [Tue, 8 Jan 2008 17:10:29 +0000]
In PL_regexp_padav, store regexps via real references, rather than
hiding them within IVs. We can do this now that they are real SV
pointers.
p4raw-id: //depot/perl@32900
Nicholas Clark [Tue, 8 Jan 2008 16:42:31 +0000]
Correct a long-standing ithreads reference counting anonamly - the
reference count only needs "doubling" when the scalar is pushed onto
PL_regex_padav for the second time.
p4raw-id: //depot/perl@32899
Yitzchak Scott-Thoennes [Mon, 7 Jan 2008 23:24:01 +0000]
ARRAY(0x...) is not very helpful in sprintf.t diagnostics
Message-ID: <55933.71.35.169.13.
1199777041.squirrel@webmail.efn.org>
From: "Yitzchak Scott-Thoennes" <sthoenna@efn.org>
Date: Mon, 7 Jan 2008 23:24:01 -0800 (PST)
p4raw-id: //depot/perl@32897
Nicholas Clark [Mon, 7 Jan 2008 23:31:34 +0000]
Post change 32880, restore the dummy sub Regexp::DESTROY {}
p4raw-id: //depot/perl@32896
Nicholas Clark [Mon, 7 Jan 2008 21:17:10 +0000]
Clarify the use of SVf_BREAK on PL_reg_curpm.
p4raw-id: //depot/perl@32895
Nicholas Clark [Mon, 7 Jan 2008 18:24:39 +0000]
Don't set the public IV or NV flags if the string converted from has
trailing garbage. This behaviour is consistent with not setting the
public IV or NV flags if the value is out of range for the type.
p4raw-id: //depot/perl@32894
Nicholas Clark [Mon, 7 Jan 2008 17:27:51 +0000]
Save an upgrade each by first setting the NV on PL_sv_yes and PL_sv_no
at interpreter construction time.
p4raw-id: //depot/perl@32893
Jari Aalto [Sat, 5 Jan 2008 13:22:17 +0000]
v5.8.8: File::Temp.pm (_gettemp): ignore dir -w test on Cygwin
Message-ID: <bq8034ba.fsf@blue.sea.net>
p4raw-id: //depot/perl@32892
Rick Delaney [Sun, 6 Jan 2008 14:14:39 +0000]
Big slowdown in 5.10 @_ parameter passing
Message-ID: <
20080106191439.GF13935@bort.ca>
p4raw-id: //depot/perl@32891
Nicholas Clark [Mon, 7 Jan 2008 13:53:57 +0000]
ReREFCNT_inc() should return a pointer to REGEXP.
[I don't get warnings about void context here, but I'm sure someone
will :-(]
p4raw-id: //depot/perl@32890