package Wrong; sub Right::new { package Right; ... SUPER ... }