Re: strange usage of s///

[brx]

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
  

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
  

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

[smls]

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

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

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...

[brx]

Thank you very much, smls. Original post updated.