http://qs1969.pair.com?node_id=11121836


in reply to Re^9: What esteemed monks think about changes necessary/desirable in Perl 7 outside of OO staff
in thread What esteemed monks think about changes necessary/desirable in Perl 7 outside of OO staff

You probably meant
substr($x, index($_ = $x =~ tr/ /x/cr, 'x'), rindex($_, 'x') - length( +$x) + 1)
map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]