This is a live mirror of the Perl 5 development currently hosted at
11 years agopodcheck.t: Add comment
Karl Williamson [Sat, 28 Jan 2012 22:25:47 +0000 (15:25 -0700)]
podcheck.t: Add comment

11 years agolocale.t: Add tests for fc()
Karl Williamson [Mon, 30 Jan 2012 18:27:07 +0000 (11:27 -0700)]
locale.t: Add tests for fc()

11 years agolocale.t: process in sorted order
Karl Williamson [Mon, 30 Jan 2012 18:25:56 +0000 (11:25 -0700)]
locale.t: process in sorted order

for easier debugging, when debugging

11 years agolocale.t: White space only
Karl Williamson [Mon, 30 Jan 2012 17:29:59 +0000 (10:29 -0700)]
locale.t: White space only

This indents code to account for a newly formed block around it,
reflowing things to fit into an 80 column window.

And it adjusts the indentation of a few other lines.

11 years agolocale.t: Add tests for IN_UNI_8_BIT
Karl Williamson [Mon, 30 Jan 2012 17:25:25 +0000 (10:25 -0700)]
locale.t: Add tests for IN_UNI_8_BIT

These are more tests for commit b36bf33f6564c3e9a9ff131f4f3c9980b7a8af15

11 years agolocale.t: white space only
Karl Williamson [Sun, 29 Jan 2012 19:16:59 +0000 (12:16 -0700)]
locale.t: white space only

Properly indent this statement

11 years agouse locale; fc(""); shouldn't taint.
Brian Fraser [Mon, 30 Jan 2012 19:30:24 +0000 (16:30 -0300)]
use locale; fc(""); shouldn't taint.

fc() brought to life its own version of #39028. fc(""), like
lc("") and friends, shouldn't taint the result.

11 years agoIncrease the fallback value of MAXPATHLEN
Dominic Hargreaves [Sat, 28 Jan 2012 14:00:39 +0000 (14:00 +0000)]
Increase the fallback value of MAXPATHLEN

On systems without MAXPATHLEN or PATH_MAX defined (GNU/Hurd is an example
of such a system), set MAXPATHLEN to 4096 rather than 1024; this increase
creates parity with Linux.

11 years agoMoving :mmap out of core binary into a module
Leon Timmermans [Wed, 25 Jan 2012 19:38:46 +0000 (20:38 +0100)]
Moving :mmap out of core binary into a module

11 years agostat.t: Use $>, not just $< for skipping
Father Chrysostomos [Mon, 30 Jan 2012 22:45:15 +0000 (14:45 -0800)]
stat.t: Use $>, not just $< for skipping

This is the paranoid version of just using $>.

11 years ago[perl #108780] Make /foo$qr/ work under ‘no overloading’
Father Chrysostomos [Mon, 30 Jan 2012 20:33:31 +0000 (12:33 -0800)]
[perl #108780] Make /foo$qr/ work under ‘no overloading’

This changes the code in pp_regcomp to use the underlying REGEXP
instead of the reference to it, when concatenating pieces to mark a
larger regular expression.  This makes /foo$qr/ work even under ‘no
overloading’.  It stopped working with commit a75c6ed6b.

11 years agoUpdate IPC-Cmd to CPAN version 0.76
Chris 'BinGOs' Williams [Mon, 30 Jan 2012 10:45:15 +0000 (10:45 +0000)]
Update IPC-Cmd to CPAN version 0.76


  Changes for 0.76    Mon Jan 30 11:30:53 GMT 2012
  * Make the empty arg stripping the default again,
    with option to override this behaviour.

  Changes for 0.74    Mon Jan 30 10:24:30 GMT 2012
  * Applied patch from WATANABE Hiroaki [RT #74470]
    "Empty string cannot be passed to command"
  * Resolved [RT #74373] reported by Randy Stauner
    "Compilation error when fails to load"

11 years agoUpdate MANIFEST
Father Chrysostomos [Mon, 30 Jan 2012 04:54:15 +0000 (20:54 -0800)]

11 years agoIncrease $Term::ReadLine::VERSION to 1.08
Father Chrysostomos [Mon, 30 Jan 2012 04:50:02 +0000 (20:50 -0800)]
Increase $Term::ReadLine::VERSION to 1.08

11 years agoAdd Darin McBride to AUTHORS
Father Chrysostomos [Mon, 30 Jan 2012 04:48:15 +0000 (20:48 -0800)]
Add Darin McBride to AUTHORS

11 years ago[perl #108470] Make Term::ReadLine use AE if available
Darin McBride [Mon, 30 Jan 2012 04:45:44 +0000 (20:45 -0800)]
[perl #108470] Make Term::ReadLine use AE if available

Term::ReadLine only allows the Tk event loop to be called during
a readline call. This should be updated to use AnyEvent which will
still work with Tk, as well as any other event loop the user may need.

With this patch, T::RL now uses AnyEvent if it is loaded, falling back
to Tk otherwise; so the Tk mode won't be affected.

T::RL::Stub has its own get_line. This does not honour the tkRunning
flag at all. If I remove it, it's fine. This patch does so.

11 years agoUpdate IO-Compress to CPAN version 2.048
Chris 'BinGOs' Williams [Sun, 29 Jan 2012 21:28:12 +0000 (21:28 +0000)]
Update IO-Compress to CPAN version 2.048


  2.048 29 January 2012

      * Set minimum zlib version to 1.2.0

      * IO::Compress test suite fails with Compress::Raw::Zlib 2.047 and zlib < 1.2.4
        [RT# 74503]

11 years agoUpdate Compress-Raw-Zlib to CPAN version 2.048
Chris 'BinGOs' Williams [Sun, 29 Jan 2012 21:23:41 +0000 (21:23 +0000)]
Update Compress-Raw-Zlib to CPAN version 2.048


  2.048 29 January 2012

      * Set minimum zlib version to 1.2.0

11 years agoUpdate Compress-Raw-Bzip2 to CPAN version 2.048
Chris 'BinGOs' Williams [Sun, 29 Jan 2012 21:20:15 +0000 (21:20 +0000)]
Update Compress-Raw-Bzip2 to CPAN version 2.048


  2.048 29 January 2012

      * No Changes

11 years agolc.t: Add tests for previously broken IN_UNI_8_BIT
Karl Williamson [Sun, 29 Jan 2012 20:47:29 +0000 (13:47 -0700)]
lc.t: Add tests for previously broken IN_UNI_8_BIT

This adds tests for commit b36bf33f6564c3e9a9ff131f4f3c9980b7a8af15

11 years agopp.c: Can grow scalar by less
Karl Williamson [Sun, 29 Jan 2012 17:41:14 +0000 (10:41 -0700)]
pp.c: Can grow scalar by less

The max expansion when a Latin1 character is folded and converted to
UTF-8 is '2' bytes per input byte, not the more general case.

11 years agopod updates for fc and \F
Brian Fraser [Mon, 9 Jan 2012 09:13:43 +0000 (06:13 -0300)]
pod updates for fc and \F

11 years agoImplement the fc keyword and the \F string escape.
Brian Fraser [Thu, 12 Jan 2012 20:22:05 +0000 (17:22 -0300)]
Implement the fc keyword and the \F string escape.

Along with the simple_casefolding and full_casefolding features.

fc() stands for foldcase, a sort of pseudo case (like lowercase),
which is used to implement Unicode casefolding. It maps a string
to a form where all case differences are erased, so it's a
locale-independent way of checking if two strings are the same,
regardless of case.

This functionality was, and still is, available through the
regular expression engine -- /i matches would use casefolding
internally. The fc keyword merely exposes this for easier access.

Previously, one could attempt to case-insensitively test two strings
for equality by doing

   lc($a) eq lc($b)

But that might get you wrong results, for example in the case of

11 years agoAdd the fc keyword in regen/
Brian Fraser [Mon, 9 Jan 2012 05:44:16 +0000 (02:44 -0300)]
Add the fc keyword in regen/

It doesn't do anything yet.

11 years agoutf8.h: Restore macro defn incorrectly trashed earlier
Karl Williamson [Sun, 29 Jan 2012 16:32:01 +0000 (09:32 -0700)]
utf8.h: Restore macro defn incorrectly trashed earlier

Commit 66cbab2c91fca8c9abc65a7231a053898208efe3 changed the definition
of IN_UNI_8_BIT, but in so doing, lost the 2nd line of the macro; and I
did not catch it.  Tests will be added shortly.

11 years agoAdd Windows 2008 to the list of Windows versions in perlport
Chris 'BinGOs' Williams [Sun, 29 Jan 2012 16:25:15 +0000 (16:25 +0000)]
Add Windows 2008 to the list of Windows versions in perlport

11 years agofeature.h: Mask hints in CURRENT_FEATURE_BUNDLE
Father Chrysostomos [Sun, 29 Jan 2012 07:06:25 +0000 (23:06 -0800)]
feature.h: Mask hints in CURRENT_FEATURE_BUNDLE

Otherwise CURRENT_FEATURE_BUNDLE will end up including any hints added
later that happen to use higher bits.

This was causing autobox to turn off all features, causing failures
for Dist::Zilla::PluginBundle::AVAR.

I’m not adding tests for this, as such tests would need constant
tweaking in future perl developement.  What autobox is doing is
naughty and unsupported anyway.

11 years ago[perl #109264] ->method(my(...)) forcing lvalue cx
Father Chrysostomos [Sun, 29 Jan 2012 03:14:39 +0000 (19:14 -0800)]
[perl #109264] ->method(my(...)) forcing lvalue cx

A simple my($foo,$bar) list is flagged as an lvalue:

$ ./perl -Ilib -MO=Concise -e 'my($foo,$bar)'
7  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v:{ ->3
6     <@> list vKPM/128 ->7
3        <0> pushmark vM/128 ->4
4        <0> padsv[$foo:1,2] vM/LVINTRO ->5
5        <0> padsv[$bar:1,2] vM/LVINTRO ->6
-e syntax OK

That 128 that the list op is the same flag as LVINTRO.

When a method call is compiled, the list op for the argument list is
itself converted into an entersub op.  That LVINTRO flag is never
turned off.  So foo->bar(my($foo,$bar)) becomes this:

$ ./perl -Ilib -MO=Concise -e 'foo->bar(my($foo,$bar))'
9  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v:{ ->3
8     <1> entersub[t4] vKMS/LVINTRO,TARG ->9
3        <0> pushmark sM/128 ->4
4        <$> const[PV "foo"] sM/BARE ->5
5        <0> padsv[$foo:1,2] lM/LVINTRO ->6
6        <0> padsv[$bar:1,2] lM/LVINTRO ->7
7        <$> method_named[PV "bar"] ->8
-e syntax OK

This was rarely a problem until commit da1dff948 added lvalue check-
ing for method calls (a fifth bug fix in that commit not mentioned in
the commit message).

Calling the method will now result in ‘Can't modify non-lvalue subrou-
tine call’ unless the method has the :lvalue attribute.

Before that, this would only cause problems with lvalue methods:

$ perl -le '
    sub clear_queue:lvalue { warn "called"; undef }
    3==main->clear_queue(my ($id, $name))
called at -e line 2.
Can't return undef from lvalue subroutine at -e line 3.

Calling it with ($id, $name) was fine, and allowed undef to
be returned.

Perl_localize in op.c (which is called for my, our and local)
calls my() (aka Perl_my_attrs) on the list itself for my or our.
Perl_my_attrs was setting flags on the list, not just on its children.

So this commit modifies my_attrs not to set any flags on the list
op itself.

local() was not affected, as it goes through op_lvalue_flags instead
of my_attrs, and op_lvalue_flags doesn’t set flags on list ops (I
mean ops of type OP_LIST, not listops in general).  I added tests for
it anyway.

11 years agoUpdate IO-Compress to CPAN version 2.047
Chris 'BinGOs' Williams [Sun, 29 Jan 2012 00:24:18 +0000 (00:24 +0000)]
Update IO-Compress to CPAN version 2.047


  2.047 28 January 2012

      * Set minimum Perl version to 5.6

      * IO::Compress::Zip
        - In one-shot zip, set the Text Flag if "-T" thinks the file is a
          text file.
        - In one-shot mode, wrote mod time & access time in wrong order
          in the "UT" extended field.

11 years agoUpdate Compress-Raw-Zlib to CPAN version 2.047
Chris 'BinGOs' Williams [Sun, 29 Jan 2012 00:01:04 +0000 (00:01 +0000)]
Update Compress-Raw-Zlib to CPAN version 2.047


  2.047 28 January 2012

      * Allow flush to be called multiple times without any intermediate
        call to deflate and still return Z_OK.
        In the code below $status was Z_BUF_ERROR before this change.

          $status = $def->flush(...);

      * Added support for zlibCompileFlags

      * Set minimum Perl version to 5.6

11 years agoUpdate Compress-Raw-Bzip2 to CPAN version 2.047
Chris 'BinGOs' Williams [Sat, 28 Jan 2012 23:56:05 +0000 (23:56 +0000)]
Update Compress-Raw-Bzip2 to CPAN version 2.047


  2.047 28 January 2012

      * Set minimum Perl version to 5.6

11 years agoTrim directory extension in pathify under EFS.
Craig A. Berry [Sat, 28 Jan 2012 23:05:35 +0000 (17:05 -0600)]
Trim directory extension in pathify under EFS.

When Extened Filename Syntax (EFS) is in effect, 1fe570cc5e24ee
changed the age-old behavior of trimming the directory extension
off a directory filename when the path is in Unix syntax.  EFS
really has nothing to do with the necessity to trim .DIR;1 from
the name, so remove the conditional check for EFS from the
existing code.

This gets three more tests passing under EFS in vms/ext/filespec.t.

11 years agoFix bug #109206: ANCH_MBOL with while /.*/g
Yves Orton [Sat, 28 Jan 2012 23:06:23 +0000 (00:06 +0100)]
Fix bug #109206: ANCH_MBOL with while /.*/g

We had a fencepost error when ANCH_MBOL was enabled that meant we
did not "see" matches at the end of string. This fixes the problem
and adds tests.

11 years agoaccidentally used my work email for a commit so add it to
Yves Orton [Sat, 28 Jan 2012 23:04:20 +0000 (00:04 +0100)]
accidentally used my work email for a commit so add it to

11 years agofix variable not shared warnings coming from the use statement being executed too...
Yves Orton [Sat, 28 Jan 2012 22:23:07 +0000 (23:23 +0100)]
fix variable not shared warnings coming from the use statement being executed too early

11 years agoIncrease $subs::VERSION to 1.01
Father Chrysostomos [Sat, 28 Jan 2012 20:14:12 +0000 (12:14 -0800)]
Increase $subs::VERSION to 1.01

11 years Add another (old?) address for Juerd
Father Chrysostomos [Sat, 28 Jan 2012 20:13:32 +0000 (12:13 -0800)] Add another (old?) address for Juerd

11 years ago[perl #21396] documentation error in
Juerd Waalboer [Sat, 28 Jan 2012 20:11:17 +0000 (12:11 -0800)]
[perl #21396] documentation error in

11 years agoAdjust skip counts in t/op/filetest_t.t.
Craig A. Berry [Sat, 28 Jan 2012 16:55:55 +0000 (10:55 -0600)]
Adjust skip counts in t/op/filetest_t.t.

Follow-up to 8db8f6b697e6f, where new tests were added without
changing the (implicit) skip count of 1.

11 years agoRestore directory extension and version in fileify under EFS.
Craig A. Berry [Sat, 28 Jan 2012 15:22:04 +0000 (09:22 -0600)]
Restore directory extension and version in fileify under EFS.

In df2786654 and 8a5aa89570, the traditional behavior of adding
the .DIR;1 onto a fileified directory spec was removed when
operating under Extended Filename Syntax.  Various scary comments
were added about its being a bug to add a type and version onto
a Unix-style path, but actually the CRTL appears to be perfectly
happy with, for example:


and without the extension, the home-grown rmdir() fails in the
case of a directory with no preceding path information.  E.g.,


was failing because there was no internal translation to foo.dir
before passing it to SYS$ERASE.

Moreover, even if there were something wrong with adding .DIR;1,
it has nothing to do with EFS.

11 years agofilelify shouldn't always escape dots.
Craig A. Berry [Sat, 28 Jan 2012 14:59:09 +0000 (08:59 -0600)]
filelify shouldn't always escape dots.

Follow-up to a9fac63d75d9222a73fbf511ca58ae1d66cbf9a7.  It turns
out that the CRTL doesn't handle the escapes when the path is in
Unix syntax (even though it requires them in native syntax).


is ok, but


fails.  So skip the escaping if there is a slash anywhere in the

11 years agoExtUtils::ParseXS: Changelog, version bump for dev release
Steffen Mueller [Sat, 28 Jan 2012 11:49:49 +0000 (12:49 +0100)]
ExtUtils::ParseXS: Changelog, version bump for dev release

Upgrade the version in ExtUtils::ParseXS to 3.13_01 for a development

11 years agomymalloc isn't thread safe (rurban)
H.Merijn Brand [Fri, 27 Jan 2012 15:09:31 +0000 (16:09 +0100)]
mymalloc isn't thread safe (rurban)

11 years agoAllow prototypes (_@) and (_%)
Rafael Garcia-Suarez [Fri, 27 Jan 2012 09:23:12 +0000 (10:23 +0100)]
Allow prototypes (_@) and (_%)

Those will be equivalent to (_;@) and (_;%) ; since perlsub already
states that the semicolon is redundant before @ and % this is in
line with the existing documentation.

11 years agoShow test names in output
Rafael Garcia-Suarez [Fri, 27 Jan 2012 08:59:54 +0000 (09:59 +0100)]
Show test names in output

11 years agoMake blead upstream for
Father Chrysostomos [Fri, 27 Jan 2012 06:29:42 +0000 (22:29 -0800)]
Make blead upstream for

This isn’t even a dual-life module.  Why it has its own entry I don’t
know; but in any case it has to have blead for upstream, otherwise
cmp_version.t skips it.

11 years agoIncrease $warnings::VERSION to 1.13
Father Chrysostomos [Fri, 27 Jan 2012 04:45:28 +0000 (20:45 -0800)]
Increase $warnings::VERSION to 1.13

11 years agoAllow ${^WARNING_BITS} to turn off lexical warnings
Father Chrysostomos [Fri, 27 Jan 2012 04:43:17 +0000 (20:43 -0800)]
Allow ${^WARNING_BITS} to turn off lexical warnings

Various magical modules copy hints from one scope to another.  But
copying ${^WARNING_BITS} doesn’t always copy the same hints.  If lexi-
cal warnings are not on at all, ${^WARNING_BITS} returns a different
value depending on the current value of $^W.  Setting ${^WARNING_BITS}
to its own value when $^W is true will stop $^W from being able to
control the warnings in the current compilation scope.  Setting
${^WARNING_BITS} to its own value when $^W is false causes even
default warnings to be suppressed.

This commit makes undef a special value that represents the default
state, in which $^W controls warnings.

11 years agopat.t: Test that . overloading gets passed qr ref
Father Chrysostomos [Fri, 27 Jan 2012 00:31:53 +0000 (16:31 -0800)]
pat.t: Test that . overloading gets passed qr ref

This is something that my sample patch in ticked #108780 (for
fixing /foo$qr/ under ‘no overloading’) would have broken had it
been applied.

11 years agostat.t: Skip test when running as root
Rainer Tammer [Thu, 26 Jan 2012 17:35:08 +0000 (09:35 -0800)]
stat.t: Skip test when running as root

11 years agoBump $Unicode::UCD::VERSION after commit c3e5bc54acca7110.
Nicholas Clark [Wed, 25 Jan 2012 14:30:05 +0000 (15:30 +0100)]
Bump $Unicode::UCD::VERSION after commit c3e5bc54acca7110.

11 years agoUpdate list of files for a minimal installation in INSTALL.
Andy Dougherty [Wed, 25 Jan 2012 13:53:07 +0000 (08:53 -0500)]
Update list of files for a minimal installation in INSTALL.

Update the minimal list of files for 5.15.7, and also for Debian's
perl-5.10.1 base package (which is what is in the Debian stable
distribution at present).  These lists do not include any explicit advice
about what to name those stripped down installations.

11 years agoCorrectly escape UTF-8 in hash keys in uninitialized warnings
Rafael Garcia-Suarez [Wed, 25 Jan 2012 11:45:25 +0000 (12:45 +0100)]
Correctly escape UTF-8 in hash keys in uninitialized warnings

11 years agoInitialize buffer to an empty string to avoid spurious uninitialized warnings
Rafael Garcia-Suarez [Wed, 25 Jan 2012 11:34:17 +0000 (12:34 +0100)]
Initialize buffer to an empty string to avoid spurious uninitialized warnings

11 years agoUpdate known_pod_issues.dat for x2p/psed
Chris 'BinGOs' Williams [Wed, 25 Jan 2012 11:06:04 +0000 (11:06 +0000)]
Update known_pod_issues.dat for x2p/psed

11 years agoFix pod error in Unicode::UCD
Chris 'BinGOs' Williams [Wed, 25 Jan 2012 10:59:28 +0000 (10:59 +0000)]
Fix pod error in Unicode::UCD

11 years agoUpdate DB_File to CPAN version 1.826
Chris 'BinGOs' Williams [Wed, 25 Jan 2012 09:39:20 +0000 (09:39 +0000)]
Update DB_File to CPAN version 1.826


  1.826 25 Jan 2012

   * t/db-btree.t - fix use of "length @array"
     [RT ##74336]

11 years agoRevert "Regen known_pod_issues.dat"
Chris 'BinGOs' Williams [Wed, 25 Jan 2012 09:30:27 +0000 (09:30 +0000)]
Revert "Regen known_pod_issues.dat"

This reverts commit 5fa409a90f64110c5708f7141b376e9bdc54fbe2.

Resolved by update of Pod-Parser to version 1.51

11 years agoUpdate Pod-Parser to CPAN version 1.51
Chris 'BinGOs' Williams [Wed, 25 Jan 2012 09:26:18 +0000 (09:26 +0000)]
Update Pod-Parser to CPAN version 1.51


  25-Jan-2012           Marek Rouchal                        <>
  Version 1.51
  + CPAN#74271: Pod::Parser should not flag L<text|hyperlink>
    undo change CPAN#47473: L<alt text|URL> _is_ allowed (see discussion on
    pod-people and p5p); confirmed by blead change; references:
  + bump all module versions (except Pod::PlainText) to 1.51
  + update META.yml (thanks rjbs for the hint)

11 years agoMake the display of the warning "Useless use of a constant (%s)" more robust
Rafael Garcia-Suarez [Wed, 25 Jan 2012 10:41:13 +0000 (11:41 +0100)]
Make the display of the warning "Useless use of a constant (%s)" more robust

If the constant is a string (POK), we dump it using pv_pretty, to
properly escape non-printable characters. This also improves detection
of utf-8 encoding in the constant to be printed. Also, this patch
streamlines the tests for the type and value of that constant.

Potential backwards-compatibility issues : if the constant is a string
it will now be enclosed in double quotes, like this :
    Useless use of a constant ("a") in void context
instead of
    Useless use of a constant (a) in void context

11 years agoCYG17 utf8 paths
Reini Urban [Tue, 12 Apr 2011 10:19:36 +0000 (12:19 +0200)]
CYG17 utf8 paths

Use cygwin_conv_path since cygwin-1.7 and support native utf-8 paths.

11 years agoUpdate DB_File to CPAN version 1.825
Chris 'BinGOs' Williams [Tue, 24 Jan 2012 22:46:59 +0000 (22:46 +0000)]
Update DB_File to CPAN version 1.825


  1.825 24 Jan 2012

    * t/db-btree.t - fix use of "length @array"
      [RT ##74336]

  and [perl #108970]

11 years agoIncrease $overload::VERSION to 1.18
Father Chrysostomos [Tue, 24 Jan 2012 20:33:49 +0000 (12:33 -0800)]
Increase $overload::VERSION to 1.18

11 years agoIn overload::AddrRef, use ‘no overloading’
Father Chrysostomos [Wed, 18 Jan 2012 21:03:32 +0000 (13:03 -0800)]
In overload::AddrRef, use ‘no overloading’

This speeds this up by about 13 times.

11 years ago[perl #108780] Make ‘no overloading’ work with qr//
Father Chrysostomos [Tue, 24 Jan 2012 18:24:21 +0000 (10:24 -0800)]
[perl #108780] Make ‘no overloading’ work with qr//

Traditionally, overload::StrVal(qr//) has returned
Regexp=SCALAR(0xc0ffee), and later Regexp=REGEXP(0xc0c0a) when regexps
were made into first-class SVs.

When the overloading pragma was added in 5.10.1, qr// things were not
accounted for, so they would still stringify as (?-xism:) even with
‘no overloading’ (or as (?^:) under 5.14).

This commit makes the overloading pragma work with qr// things, so
that they stringify the same way as overload::StrVal; i.e., as

11 years agoMove amagic hint checking to new function
Father Chrysostomos [Tue, 24 Jan 2012 17:46:11 +0000 (09:46 -0800)]
Move amagic hint checking to new function

so that stringification will be able to use it, too.

11 years agoCall FETCH once for stacked filetest ops
Father Chrysostomos [Tue, 24 Jan 2012 17:23:02 +0000 (09:23 -0800)]
Call FETCH once for stacked filetest ops

11 years agoskip sigdispatch.t on cygwin RT#88814
Reini Urban [Tue, 24 Jan 2012 15:30:47 +0000 (09:30 -0600)]
skip sigdispatch.t on cygwin RT#88814

11 years ago[perl #77388] Make stacked -t work
Father Chrysostomos [Tue, 24 Jan 2012 07:36:29 +0000 (23:36 -0800)]
[perl #77388] Make stacked -t work

Up till now, -t was popping too much off the stack when stacked with
other filetest operators.

Since the special use of _ doesn’t apply to -t, we cannot simply have
it use _ when stacked, but instead we pass the argument down from the
previous op.

To facilitate this, the whole stacked mechanism has to change.

As before, in an expression like -r -w -x, -x  and -w are flagged
as ‘stacking’ ops (followed by another filetest), and -w and -r are
flagged as stacked (preceded by another filetest).

Stacking filetest ops no longer return a false value to the next op
when a test fails, and stacked ops no longer check the truth of the
value on the stack to determine whether to return early (if it’s

The argument to the first filetest is now passed from one op to
another.  This is similar to the mechanism that overloaded objects
were already using.  Now it applies to any argument.

Since it could be false, we cannot rely on the boolean value of the
stack item.  So, stacking ops, when they return false, now traverse
the ->op_next pointers and find the op after the last stacked op.
That op is returned to the runloop.  This short-circuiting is proba-
bly faster than calling every subsequent op (a separate function call
for each).

Filetest ops other than -t continue to use the last stat buffer when
stacked, so the argument on the stack is ignored.

But if the op is preceded by nothing other than -t (where preceded
means on the right, since the ops are evaluated right-to-left), it
*does* use the argument on the stack, since -t has not set the last
stat buffer.

The new OPpFT_AFTER_t flag indicates that a stacked op is preceded by
nothing other than -t.

In ‘-e -t foo’, the -e gets the flag, but not in ‘-e -t -r foo’,
because -r will have saved the stat buffer, so -e can just use that.

11 years ago[ #74289] Don’t make *CORE::foo read-only
Father Chrysostomos [Tue, 24 Jan 2012 05:45:21 +0000 (21:45 -0800)]
[ #74289] Don’t make *CORE::foo read-only

newATTRSUB requires the sub name to be passed to it wrapped up in
a const op.

Commit 8756617677dbd allowed it to accept a GV that way, since
S_maybe_add_coresub (in gv.c) needed to pass it an existing GV not in
the symbol table yet (to simplify code elsewhere).

This had the inadvertent side-effect of making the GV read-only, since
that’s what the check function for const ops does.

Even if we were to call this a feature, it wouldn’t make sense as
implemented, as GVs for non-ampable (&-able) subs like *CORE::chdir
were not being made read-only.

This commit adds a new flag to newATTRSUB, to allow a GV to be passed
as the o parameter, instead of an op.  While this may look as though
it’s undoing the simplification in commit 8756617677dbd by adding
more code, the new code is still conceptually simpler and more

Since newATTRSUB is in the API, I had to add a new _flags variant.
(How did newATTRSUB get into the API to begin with?)

In adding a test, I also discovered that ‘used once’ warnings
were applying to these subs, which is obviously wrong.  Commit
8756617677dbd caused that, too, as it was relying on the side-effect
of newATTRSUB doing a GV lookup.

This fixes that, too, by turning on the multi flag in

11 years agoFix bad pointer size in has_trailing_nul
Eric Brine [Tue, 24 Jan 2012 02:55:52 +0000 (18:55 -0800)]
Fix bad pointer size in has_trailing_nul

11 years agopoint git-using installers to pod/perlgit
Ricardo Signes [Tue, 24 Jan 2012 02:50:11 +0000 (21:50 -0500)]
point git-using installers to pod/perlgit

...this change was promised to Jim Keenan

11 years agoperldelta for ~~ fix
Ricardo Signes [Tue, 24 Jan 2012 02:27:35 +0000 (21:27 -0500)]
perldelta for ~~ fix

11 years agoEnforce Any ~~ Object smartmatch precedence
Leon Timmermans [Mon, 23 Jan 2012 01:01:00 +0000 (02:01 +0100)]
Enforce Any ~~ Object smartmatch precedence

11 years agoIncrease $B::VERSION to 1.34
Father Chrysostomos [Tue, 24 Jan 2012 02:13:55 +0000 (18:13 -0800)]
Increase $B::VERSION to 1.34

11 years agoB.xs add missing B::COP::stashflags
Reini Urban [Mon, 23 Jan 2012 18:52:02 +0000 (12:52 -0600)]
B.xs add missing B::COP::stashflags

Threaded perl added this field with 5.15.4 for utf8 stashes.

11 years POD: revise 44f7f2d5b1 on IoFLAGS
Reini Urban [Mon, 23 Jan 2012 18:10:05 +0000 (12:10 -0600)] POD: revise 44f7f2d5b1 on IoFLAGS

IoFLAGS are not defined in perliol.h

11 years agoMore un-TODOs and two typos in vms/ext/filespec.t.
Craig A. Berry [Sun, 22 Jan 2012 14:29:47 +0000 (08:29 -0600)]
More un-TODOs and two typos in vms/ext/filespec.t.

Two tests that actually pass under Extended Filename Syntax and
two that will now pass if we give them the correct expectations.

11 years agoHandle directories with dots in fileify under EFS.
Craig A. Berry [Sun, 22 Jan 2012 14:03:26 +0000 (08:03 -0600)]
Handle directories with dots in fileify under EFS.

When Extended Filename Syntax (EFS) is in effect, it's legal for
directory names to contain dots that are not directory delimiters.
This commit escapes such dots when they are part of the file
portion of the fileified directory spec.

This gets two more of the vms/ext/filespec.t tests passing when
EFS is in effect.

11 years agoperlpodspec: Remove outdated text
Karl Williamson [Mon, 23 Jan 2012 18:19:51 +0000 (11:19 -0700)]
perlpodspec: Remove outdated text

This warning against using alternate text with hyperlinks is no longer
valid, See

And relevant changes:

11 years agosv.c:sv_utf8_encode: simplify code
Father Chrysostomos [Mon, 23 Jan 2012 06:58:58 +0000 (22:58 -0800)]
sv.c:sv_utf8_encode: simplify code

sv_force_normal already croaks for read-only variables

11 years agouniversal.c:XS_utf8_decode: rmv redundant code
Father Chrysostomos [Mon, 23 Jan 2012 06:56:50 +0000 (22:56 -0800)]
universal.c:XS_utf8_decode: rmv redundant code

SvPV_force_nolen already calls sv_force_normal for us.

11 years agoDon’t allow read-only regexps to be tied
Father Chrysostomos [Mon, 23 Jan 2012 06:48:42 +0000 (22:48 -0800)]
Don’t allow read-only regexps to be tied

Since the test triggered another bug in freeing read-only
regexps, this commit fixes that too.

11 years agoperldelta: Rmv git relict line
Karl Williamson [Mon, 23 Jan 2012 14:44:38 +0000 (07:44 -0700)]
perldelta: Rmv git relict line

This line was a result of clearing a rebasing conflict, and I failed to
remove it.

11 years agosv_force_normal: Don’t confuse regexps with cows
Father Chrysostomos [Mon, 23 Jan 2012 06:39:47 +0000 (22:39 -0800)]
sv_force_normal: Don’t confuse regexps with cows

Otherwise we get assertion failures and possibly corrupt
string tables.

11 years Remove fallacious comment
Father Chrysostomos [Mon, 23 Jan 2012 06:20:36 +0000 (22:20 -0800)] Remove fallacious comment

11 years agoIncrease $English::VERSION to 1.05
Father Chrysostomos [Mon, 23 Jan 2012 06:20:00 +0000 (22:20 -0800)]
Increase $English::VERSION to 1.05

11 years ago[perl #108794] Call special blocks in void context
Father Chrysostomos [Sun, 22 Jan 2012 23:59:16 +0000 (15:59 -0800)]
[perl #108794] Call special blocks in void context

Now BEGIN blocks, etc., are called in void context, so the result of
evaluating the last statement is not wastefully copied.

11 years ago[ #72767] Don’t propagate warnings into do-file
Father Chrysostomos [Sun, 22 Jan 2012 22:07:04 +0000 (14:07 -0800)]
[ #72767] Don’t propagate warnings into do-file

I completely forgot about do-file when, in commit f45b078d2, I stopped
eval from localising hints at run time.  The result was that warning
hints were propagating into do-file.

11 years agoRegen known_pod_issues.dat
Chris 'BinGOs' Williams [Sun, 22 Jan 2012 21:43:23 +0000 (21:43 +0000)]
Regen known_pod_issues.dat

11 years agoUpdate Pod-Parser to CPAN version 1.50
Chris 'BinGOs' Williams [Sun, 22 Jan 2012 20:07:04 +0000 (20:07 +0000)]
Update Pod-Parser to CPAN version 1.50


  16-Jan-2011           Marek Rouchal                        <>
  Version 1.50
  + fix whitespace (esp. CR [\r] related) issues with different Perl versions
    on Windows (with Perl 5.8.8 [Activestate], and 5.6.1 [SUA])
  + merge latest core (5.14.x) changes to this distro
  + CPAN#73446: fix minor POD error in
  + CPAN#43955: podchecker fails to detect superfluous =cut directive:
    implemented (and extended by a check for superfluous =pod commands) and
    documented in Pod::Checker; also added a note in the POD of all modules
    that they are part of the Pod::Parser distribution
  + CPAN#46695: use consistent version (1.50) for distribution and all Pod::
    modules in this distro (except for Pod::PlainText, which stays at 2.05)
  + CPAN#52086: mismatch between distro and module version:
    same as above
  + CPAN#55121: correction for Pod::Find and t/pod/find.t on VMS
  + CPAN#47473: podchecker on L<> url with alt text
    ... causes an error in Pod::Checker now
  + CPAN#57954: Pod::Usage does not find perldoc when perl is relocatable
    ... use $Config{scriptdirexp} instead of scriptdir
  + CPAN#61223: podchecker notice missing blank line before command
    implemented with more tests in poderrs.t and self test of all *.pms
  + CPAN#66614: parse of no final newline vs perl -w
    ... a rare case, but fixed nevertheless
  + CPAN#68157: Pod-Parser-1.38/lib/Pod/ question/bug
    ... pass through formatting options to Pod::Text
  + CPAN#70771: mishandles symbolic links in @INC
    ... fixed by making the paths in @INC absolute, using Cwd::abs_path()
  + CPAN#71139: 3 possible optimisations
    ... applied
  + several other tickets processed and closed

11 years agoSync Module-CoreList version in
Chris 'BinGOs' Williams [Sun, 22 Jan 2012 19:40:58 +0000 (19:40 +0000)]
Sync Module-CoreList version in

11 years agoperllocale: Correct various Perl version references
Karl Williamson [Sat, 21 Jan 2012 16:29:01 +0000 (09:29 -0700)]
perllocale: Correct various Perl version references

Spotted by Nicholas Clark

11 years agolocale.t: White-space, comment only
Karl Williamson [Wed, 18 Jan 2012 19:28:21 +0000 (12:28 -0700)]
locale.t: White-space, comment only

This tidies up the white space to reflect a previous commit which added
and subtracted blocks, and reflows to fit in an 80 column window,
removes trailing white space, and rewords a comment.


11 years agoAdd :not_characters parameter to 'use locale'
Karl Williamson [Wed, 18 Jan 2012 16:35:52 +0000 (09:35 -0700)]
Add :not_characters parameter to 'use locale'

This adds the parameter handling, tests, and documentation for this new
feature which allows locale and Unicode to play well with each other.

11 years agolocale.t: Don't bother testing locales with malformed names
Karl Williamson [Wed, 18 Jan 2012 18:26:24 +0000 (11:26 -0700)]
locale.t: Don't bother testing locales with malformed names

Instead, just fail those.

11 years agolocale.t: remove unused debug stuff
Karl Williamson [Wed, 18 Jan 2012 18:18:57 +0000 (11:18 -0700)]
locale.t: remove unused debug stuff

11 years agoperluniintro: Shorten too-long verbatim lines
Karl Williamson [Wed, 18 Jan 2012 17:57:44 +0000 (10:57 -0700)]
perluniintro: Shorten too-long verbatim lines

11 years agoperllocale: Remove trailing blanks
Karl Williamson [Wed, 18 Jan 2012 17:38:53 +0000 (10:38 -0700)]
perllocale: Remove trailing blanks

11 years Pod tweaks
Karl Williamson [Wed, 18 Jan 2012 16:35:07 +0000 (09:35 -0700)] Pod tweaks