The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package t::Sample::IgnoreWarnings;

use t::ToolSet::Null;

my $var = "";
$var = $var + 1; # shouldn't warn

1; # return true