*$_ = sub { &main::trigger; shift()->$s(@_) };