my $bar = "hello"; #-- global

sub mysub {
  if (condition) {
    my $bar = "goodbye";
  }
  print $bar;
}