http://qs321.pair.com?node_id=11119608


in reply to binding operator

The regexes aren't the same:
$ perl -wE 'say for qr/(a|b|x)/i, qr{ /(a|b|x)/}i' (?^ui:(a|b|x)) (?^ui: /(a|b|x)/)

Moreover, $_ = /.../ not only matches against $_, but also changes its content (it sets it to the result of the match).

Also note that my $_ is invalid since 5.24.

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]