my $var;
...
{
   my $var = $var;
   ...
}