Select Code to Download

use Scalar::Util 'blessed';

sub curried_can
...
    # first argument is a class name, curried arguments
    return sub { $sub->( @_ ) };
}