$ perl -Mstrict -E'no strict qw(vars); $hello = "Hi"; say $hello'
Hi