The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Moose::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
  

DESCRIPTION

This is a role to describe operations on the Code type.

METHODS

curry (@values)
rcurry (@values)
conjoin (\&sub)
disjoin (\&sub)
compose (@subs)

This will take a list of @subs and compose them all into a single subroutine where the output of one sub will be the input of another.

y

This implements the Y combinator.

u

This implements the U combinator.

meta

SEE ALSO

http://en.wikipedia.org/wiki/Fixed_point_combinator
http://blade.nagaokaut.ac.jp/cgi-bin/scat.rb/ruby/ruby-talk/20469

BUGS

All 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.

AUTHOR

Stevan Little <stevan@iinteractive.com>

COPYRIGHT AND LICENSE

Copyright 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.