% perl -le 'use strict; $x = 1; print $x'
Global symbol "$x" requires explicit package name at -e line 1.
Global symbol "$x" requires explicit package name at -e line 1.
Execution of -e aborted due to compilation errors.
% perl -le 'use strict; $main::x = 1; print $::x'
1