use strict 'vars';
    $X::foo = 1;	# ok, fully qualified
    my $foo = 10;	# ok, my() var
    local $baz = 9;	# blows up, $baz not declared before
    package Cinna;
    our $bar;	# Declares $bar in current package
    $bar = 'HgS';	# ok, global declared via pragma