# Foo.pm
package Foo;
sub import {
    strict->import;
}

# script
use Foo;
$yup = 5; # bang! (Global symbol "$yup" requires explicit...)