Curried subroutines in Perl using D::D