use Filter::ignore-until-BEGIN-token; b@d __BEGIN__ print 'ignore b@d'; die;