Re: Why Perl gets confused here?

[NetWallah]

You have som extra parens.
Here is how the code is being interpreted:

substr(substr($p, 0, 1) = '123', 0, 1) = 'x';
substr((substr($q, 0, 1)) = '123', 0, 1) = 'x';

B::Deparse is your friend.

[Anonymous Monk]

i dont think extra parens kill lvalues

$ perl -le 'sub x:lvalue{$a} x="y";print$a'
y
$ perl -le 'sub x:lvalue{$a} (x)="y";print$a'
y

[ikegami]

$ perl -le'sub x:lvalue{$a} print scalar( x="y" );'
y

$ perl -le'sub x:lvalue{$a} print scalar( (x)="y" );'
1