Re^4: (almost) foldl


Come for the quick hacks, stay for the epiphanies.
	PerlMonks

by BrowserUk (Patriarch)

on Jun 09, 2011 at 10:23 UTC ( [id://908877]=note: print w/replies, xml )

Need Help??

Whilst Aristotle's Y() combinator is very clever, the requirement to assign the coderef to a local variable complicates the using code.

If something along these lines were to be built-in, I'd like to simplify it so that you could write:

print sub{ ( shift() // return ) + &$^SUB }->( 1 .. 10 );
[download]

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.

"Science is about questioning the status quo. Questioning authority".

In the absence of evidence, opinion is indistinguishable from prejudice.

Comment on Re^4: (almost) foldl Download Code

Replies are listed 'Best First'.
Re^5: (almost) foldl by dk (Chaplain) on Jun 10, 2011 at 07:41 UTC
agree, $^SUB is what we are missing ... can we steal it from perl6 ? :)	[reply]
Re^6: (almost) foldl by TimToady (Parson) on Jun 10, 2011 at 23:29 UTC
Well, if you're gonna borrow a bit of Perl 6, how about borrowing all of it: `[+] @list` [download] I'm assuming, of course, that translation to Perl 6 can be considered a form of obfuscation... `:)`	[reply] [d/l]
Re^6: (almost) foldl by BrowserUk (Patriarch) on Jun 10, 2011 at 08:04 UTC
Looking at perlvar, I guess it might have to be `${^SUB}` to fit with the latest Perl5 naming conventions. Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". In the absence of evidence, opinion is indistinguishable from prejudice.	[reply] [d/l]

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://908877]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others taking refuge in the Monastery: (12)

As of 2024-04-23 08:42 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found