Select Code to Download

$ perl -c -e " use strict; use warnings; { $foo = 1 } { $bar }} "
Global symbol "$foo" requires explicit package name at -e line 1.
Global symbol "$bar" requires explicit package name at -e line 1.
Unmatched right curly bracket at -e line 1, at end of line
syntax error at -e line 1, near "}}"
-e had compilation errors.

$ perl -e " use strict; use warnings;  { our $foo = 1 } { our $bar } p
+rint 666"
666