Select Code to Download

$foo = 'foo';
sub printfoo { print $foo; }
...
  printfoo();           # prints 'bar'
}
printfoo();             # prints 'foo'

$foo = 'foo';
sub printfoo { print $foo; }
...
  $foo = $hidden_foo;
}
printfoo()                  #prints 'foo'