my   $i = 0;
my $str = "";
my $var;
...
$var = 10;