$ perl -Mstrict -cwe 'my $bar; foo $bar;' -e syntax OK