rob@budapest:/home/rob# cat test.perl
#!/usr/bin/perl -s

use strict;

print "bar!\n" if ($foo);

rob@budapest:/home/rob# ./test.perl -foo
Variable "$foo" is not imported at ./test.perl line 5.
Global symbol "$foo" requires explicit package name at ./test.perl line 5.
Execution of ./test.perl aborted due to compilation errors.


##</code><code>##

rob@budapest:/home/rob# cat test.perl
#!/usr/bin/perl -s

use strict;

{
    no strict;
    print "bar!\n" if ($foo);
}

rob@budapest:/home/rob# ./test.perl -foo
bar!