use strict only works in the current package ... for example:
# file foo.pm
package foo;
$foo = 1;
---------------------------
# file foo.pl
use strict;
use foo;
print $foo::foo,$/;
---------------------------
[jeffa@trinity perl]$ perl -c foo.pm
foo.pm syntax OK
[jeffa@trinity perl]$ perl -c foo.pl
foo.pl syntax OK
[jeffa@trinity perl]$ ./foo.pl
1
UPDATE:
s/package/scope/ -- thanks
pg and
hawtin :)
jeffa
L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)