comment on

I personally believe this is great news. I actually ignored that readpipe is the beast behind qw. Anyway, to quote from the post you linked to:

The prototype of readpipe() is now ($). Previously, it was broken:
$ perl5.8.8 -wle 'print prototype"CORE::readpipe"'
Can't find an opnumber for "readpipe" at -e line 1.
$ bleadperl -wle 'print prototype"CORE::readpipe"'
$
[download]

So an immediate observation is that -X are still "broken" (in Gabriel's own words, which thus I will take for absolutely true, and literally!) in 5.10.0 and I don't have the slightest idea in blead. Furthermore, I don't have the slightest idea of which is the beast behind them: if you check the rest of the thread @ clpmisc then you'll see that I tried with stat but evidence is it's not what "I" (actually, I'm just trying to help someone, but the matter became intriguing for me too...) was after:

actarus:~/test [13:02:32]$ ls
foo.pl
actarus:~/test [13:02:35]$ cat foo.pl
#!/usr/bin/perl

use strict;
use warnings;

my %file;

BEGIN {
    no strict 'refs';
    *{'CORE::GLOBAL::stat'} = sub {
        warn "trying mocked stat()\n";
        (my $f)=@_;
        CORE::stat( @_ && !ref($f) &&
                    exists $file{$f} ? $0 : @_ );
    };
}

use Test::More qw(no_plan);

$file{foo} = 1;
ok( (scalar stat $_) => "file $_ exists") for qw/foo bar/;
ok( (-e $_) => "file $_ exists") for qw/foo bar/;

__END__
actarus:~/test [13:02:38]$ ./foo.pl
trying mocked stat()
ok 1 - file foo exists
trying mocked stat()
not ok 2 - file bar exists
#   Failed test 'file bar exists'
#   at ./foo.pl line 21.
not ok 3 - file foo exists
#   Failed test 'file foo exists'
#   at ./foo.pl line 22.
not ok 4 - file bar exists
#   Failed test 'file bar exists'
#   at ./foo.pl line 22.
1..4
# Looks like you failed 3 tests of 4.
[download]

--
If you can't understand the incipit, then please check the IPB Campaign.

In reply to Re^2: Previously unseen error in connection with -X functions by blazar
in thread Previously unseen error in connection with -X functions by blazar

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


go ahead... be a heretic
	PerlMonks