Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^11: What esteemed monks think about changes necessary/desirable in Perl 7 outside of OO staff

by likbez (Sexton)
on Sep 16, 2020 at 15:10 UTC ( [id://11121838]=note: print w/replies, xml ) Need Help??


in reply to Re^10: 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

Does not matter what variable you use:

# perl -e ' { $line=" aaa bbb ccc ddd eee fff "; $line=substr($l +ine,index($_=$line=~tr/ /x/cr,'x'),rindex($_,'x')-length($line)+1); p +rint qq(|$line|\n)}' |aaa bbb ccc ddd eee fff|

Replies are listed 'Best First'.
Re^12: What esteemed monks think about changes necessary/desirable in Perl 7 outside of OO staff
by choroba (Cardinal) on Sep 16, 2020 at 15:12 UTC
    Sorry, I used a different variable name. The real difference was the placement of the parentheses.

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

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://11121838]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (6)
As of 2024-03-29 13:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found