isa Bar qw(Baz Bas Boo);

##</code><code>##

isa Bar, isa Baz, isa Bas, isa Boo;

##</code><code>##

-push @{caller().'::ISA'}, @_;
+push @{caller().'::ISA'}, map {m#^main$# ? () : $_} @_;