Select Code to Download

$a_huge_value = 3200000;

...

sub getValue { return $_[0]; }
sub codeThatUsesFoo { return $_[0]; }

[bobn@trc2:/home/bobn/misc]# perl my2.pl
14
...
[bobn@trc2:/home/bobn/misc]# perl my2.pl
14
16

sub getValue { return }
sub codeThatUsesFoo { return }

[bobn@trc2:/home/bobn/misc]# perl my2.pl
12
...
12
13