Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re (tilly) 2: Subroutine chaining idiom requested

by tilly (Archbishop)
on May 24, 2001 at 07:24 UTC ( [id://82805]=note: print w/replies, xml ) Need Help??


in reply to Re: Subroutine chaining idiom requested
in thread Subroutine chaining idiom requested

Did someone say golf?
sub chain{(*f,*_)=@_;@_=&$_ for@f;@_}
Of course you probably want strict compliant and it is bad style to modify your arguments in place. In which case it is probably better to make that:
sub chain{my($f,$a)=@_;$a=[&$_(@$a)]for@$f;@$a}
which is still reasonable...

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others taking refuge in the Monastery: (7)
As of 2024-03-29 00:07 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found