JimLS:

I expect that just adding something like this:

sub PREVENT_USELESS_WARNING { my $t = $sub }
[download]

or similar shenanigans would do fine.

...roboticus

When your only tool is a hammer, all problems look like your thumb.