Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^6: RFC: beginner level script improvement (various comments)

by smls (Friar)
on Nov 05, 2013 at 07:32 UTC ( #1061257=note: print w/ replies, xml ) Need Help??


in reply to Re^5: RFC: beginner level script improvement (various comments)
in thread RFC: beginner level script improvement

Yes, you should of course use whatever you feel most comfortable with.

FYI, here are two even shorter ways to write that if clause... ;)

# using a loop: if (@_) { $self->{$_} = shift for qw(stuff1 stuff2 stuff3); } # using a hash slice (probably the fastest alternative): @$self{qw( stuff1 stuff2 stuff3 )} = @_ if @_;

(The @ sigil in front of the $self hashref is not a typo - see Slices for more info on that.)


Comment on Re^6: RFC: beginner level script improvement (various comments)
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (14)
As of 2014-09-30 17:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (378 votes), past polls