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

Re^3: push to a referenced array

by jasonk (Parson)
on Sep 28, 2008 at 14:15 UTC ( [id://714172]=note: print w/replies, xml ) Need Help??


in reply to Re^2: push to a referenced array
in thread push to a referenced array

Hiding implentation details by writing tiny functions instead of just using references the way everybody else does rarely makes code cleaner. This is doubly true when the function you replace it with is obfuscated.

If you really need a golf function to do it though, it can be made shorter...

sub ref_push{push@{$_[0]||=[]},@_[1..$#_]}

www.jasonkohles.com
We're not surrounded, we're in a target-rich environment!

Replies are listed 'Best First'.
Re^4: push to a referenced array
by biga (Sexton) on Sep 28, 2008 at 17:42 UTC
    Thank you for advice, guys. You've helped me a lot. %)

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others avoiding work at the Monastery: (6)
As of 2024-04-23 09:32 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found