my $var;  # Currently $var is undef
print $var + 5, "\n"; # 5
print ++$var, "\n";   # 1