package My::Module;

use warnings::register;

...;
warnings::warnif("The flooble has become discombobulated!");
...;