package MyModule;

my $sub = sub { ... };

$sub->() for 1 .. 2;        # call the sub twice