Select Code to Download

use strict;

...

foo();
print($x);  # foo

use strict;

...
my $x;
foo();
print($x);  # foo

$basename = 'not' . $basename;