Re^2: [RFC: Cool Uses for Perl] Heavy currying: weighted randomized word generator for conlangers

Thank you very much for reveal my confusion. I corrected my post accordingly. To perlify your example:

sub curriable_add {
    my ($first, $second) = @_;
    croak "first argument is undefined" if !defined $first;
    return $first + $second if defined $second;
    return sub { $first + shift };
}
[download]

Comment on Re^2: [RFC: Cool Uses for Perl] Heavy currying: weighted randomized word generator for conlangers Download Code