$ perl -wMstrict -e 'our $foo => 1;' $