use constant DEBUG => main->can("DEBUG") && main->DEBUG;