Help for this page
sub makeclosure { my @x=(@_); ... return makeclosure(val1,val2); #on error return bless sub {undef or die},"errormessage";
if(ref($return=&yoursubhere($a->(),$s->())ne"CODE"){ #error } &nextsub($return->())