|
NAMEMoose::Autobox::Code - the Code role SYNOPOSIS use Moose::Autobox;
my $adder = sub { $_[0] + $_[1] };
my $add_2 = $adder->curry(2);
$add_2->(2); # returns 4
# create a recursive subroutine
# using the Y combinator
*factorial = sub {
my $f = shift;
sub {
my $n = shift;
return 1 if $n < 2;
return $n * $f->($n - 1);
}
}->y;
factorial(10) # returns 3628800
DESCRIPTIONThis is a role to describe operations on the Code type. METHODS
SEE ALSO
BUGSAll complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to cpan-RT. AUTHORStevan Little <stevan@iinteractive.com> COPYRIGHT AND LICENSECopyright 2006-2008 by Infinity Interactive, Inc. <http://www.iinteractive.com> This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
|