Re^2: How to improve regex for parsing equals delimited data

Hmmm... I wish that the result of a pre-increment was an lvalue. That would allow this:

my %x = (field => $F[$_ - 1], value => $F[$_]);
[download]

to become this...

my %x = (field => $F[(--$_)++], value => $F[$_]);
[download]

or maybe even...

my %x = (field => $F[--$_++], value => $F[$_]);
[download]

Now that would be a fun idiom! As things stand, this works:

my %x = (field => $F[--$_], value => $F[++$_]);
[download]

That said, my initial boring version is probably more readable.

Update: I've just remembered the secret inchworm-on-a-stick operator. This is one of those rare opportunities it's actually useful:

my %x = (field => $F[~-$_], value => $F[$_]);
[download]

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

Comment on Re^2: How to improve regex for parsing equals delimited data Select or Download Code