if ($foo) {
   my $bar = "true";
}
print $bar;
print "again" . $bar; #-- does this still work
<cut 500 lines>
print "and again" . $bar; #-- what about this?