This Week on perl5-porters (21-27 June 2004)

rafael on 2004-06-30T08:47:00

Summer is here, and it's vacation time for the Perl 5 porters. Well, except for the valorous maint pumpking, who just released a snapshot of perl 5.8.5-to-be.

cat, pipe, perl

Nicholas Clark finds that doing a simple pipe :

    cat | perl

on his system produces the trange error message, cat: stdin: Resource temporarily unavailable. After some investigation he decides it's probably a FreeBSD 5 threading bug.

    http://groups.google.com/groups?selm=rt-3.0.9-30443-91308.18.7666584401696%40per l.org 

Regexp bug, fixed

Jeff Pinyan found and fixed a regular expression bug: character ranges are not computed correctly with \p and \P.

    http://groups.google.com/groups?selm=Pine.LNX.4.44.0406241636340.8774-200000%40p erlmonk.org 

In Brief

Edward Peschko remarks that tieing a hash which is already populated with some values erases those values. Nicholas Clark explains that tie() isn't actually destroying the values, but merely hiding them. Once the hash untied, the original data is still there.

    http://groups.google.com/groups?selm=20040625022625.GA3087%40mdssdev05 

David R.Schulte experiments that sometimes, taint error messages are emitted for a whole conditional expression, even though only a unused part of the expression is actually tainted. (bug #30461.)

    http://groups.google.com/groups?selm=rt-3.0.9-30461-91366.11.3892106357267%40per l.org 

Ken Williams released Cwd 2.18.

Patch of the month

Paul Fenwick proposed a patch to make sort() play nethack when it's called in scalar context.

    http://groups.google.com/groups?selm=40DA505A.2050500%40perltraining.com.au
    http://www.nethack.org/ 

Last minute

Nicholas released a snapshot of maintperl, just before the code freeze for perl 5.8.5. Testers most welcome.

    http://groups.google.com/groups?selm=20040627220127.GC39967%40plum.flirble.org 

About this summary

This summary was written by Rafael Garcia-Suarez. Weekly summaries are published on http://use.perl.org/ and posted on a mailing list, which subscription address is perl5-summary-subscribe@perl.org . Comments and corrections welcome.

---

Any fixes for memory leaks in this one?

egarland on 2004-06-30T16:14:23

Are we still leaking like mad on this:

use threads; use threads::shared; share (@q); $q[0] = &share([]); while (1) { push (@{ $q[0] }, $_); shift(@{ $q[0] }); }

and this:

use threads; use threads::shared; share (%q); $q{0} = &share([]); while (1) { push (@{ $q{0} }, $_); shift(@{ $q{0} }); }

Re:Any fixes for memory leaks in this one?

egarland on 2004-06-30T17:12:40

Let's try that with plain old text turned on.
Are we still leaking like mad on this:

use threads;
use threads::shared;
share (@q);
$q[0] = &share([]);
while (1) {
        push (@{ $q[0] }, $_);
        shift(@{ $q[0] });
}

and this:

use threads;
use threads::shared;
share (%q);
$q{0} = &share([]);
while (1) {
        push (@{ $q{0} }, $_);
        shift(@{ $q{0} });
}