Here's the cheat sheet on strict. Declare global variables with our() (or declare them up at the top with 'use vars ...'. and everything other variable with my(). The rest of strict's functions will stop you from writing bugs so if you run into other things then your code is already incorrect.

use vars ( '$SOME_GLOBAL' );

$SOME_GLOBAL = 42;

our $ANOTHER_GLOBAL = 'fnord';

sub a_function {
    # A variable declared just for the inside of a_function.
    my $some_param = shift;

    print "$some_param\n";
}
[download]