in reply to strange usage of s/// [solved: Perl 5.14 and 5.16 bug]

B::Deparse seems to understand and to see difference between variants:

1) Original:

perl -MO=Deparse -e '$_="abcdef"; s/@{[s".."."gr]}\K$"//; print'
$_ = 'abcdef';
s[@{[s/.././rg];}\K][$"];
print $_;
-e syntax OK

[download]

Do the rigth thing, but why?!

2) Litteral space char (not $"):

perl -MO=Deparse -e '$_="abcdef"; s/@{[s".."."gr]}\K //; print'
$_ = 'abcdef';
s[@{[s/.././rg];}][\\K ];
print $_;
-e syntax OK

[download]

Strange, isn't it? :). I'm confused...

English is not my mother tongue.
Les tongues de ma mère sont "made in France".

Replies are listed 'Best First'.
Re^2: strange usage of s///
by smls (Friar) on Sep 03, 2013 at 22:25 UTC
    Perl v5.18.1 handles them as one would expect: 
    perl -MO=Deparse -e '$_="abcdef"; s/@{[s".."."gr]}\K$"//; print'
$_ = 'abcdef';
s[@{[s/.././gr];}\K$"][];
print $_;
-e syntax OK

    [download]
    perl -MO=Deparse -e '$_="abcdef"; s/@{[s".."."gr]}\K //; print'
$_ = 'abcdef';
s[@{[s/.././gr];}\K ][];
print $_;
-e syntax OK

    [download]

    PS: With Perl v5.14.2 I get the same result as you.

    (Testing environment was 64bit Linux in both cases.)

    So yeah, strange indeed...

[reply]
[d/l]
[select]

      Thank you very much, smls. Original post updated.

[reply]

In Section Seekers of Perl Wisdom