my $var1;
$var1++;
print "Var1 is now $var1\n";

my $var2;
$var2 = "Foobar";
print "Var2 is now $var2\n";