use warnings; use strict; sub complain { require Carp; Carp::carp "This should not work!"; }