Think about Loose Coupling | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
Short answer: Use =~ instead of = to bind a regex against a variable.
Long answer: The $_ is the default topic. You don't need to mention it in many contexts, matching a regex being one of them. So, you can shorten the code to
When you use =, it changes the contents of $_, so after the first condition, it contains the result of the regex match, not the original user input. Also, remove the my from $_. Lexical $_ was deprecated and is not supported in modern Perl versions. Use local if you want to incorporate the code into a larger codebase. Update: Moreover, you can also use a hash from sigils to data types, no regex and if/else needed:
Update2: The $_ will be populated with the match result, not with the regex. Thanks AnomalousMonk.
map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
In reply to Re: If statement not working
by choroba
|
|