perl -we 'my $fooo;'