my $foo = 0;