my $handler = can main "_$action"; #### my $handler = MyTool->can("_$action");