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

use t::ToolSet::NoStrictRefs;

our $var = 42;

my $name = "var";
${$name}++; # OK with no strict refs

$pi = 3.14; # Should fails under strict

1;          # return true