$mysub = sub {
 …
 …
};