Select Code to Download

my $foo = get_foo();
do_something($foo);

do_something( get_foo() );

my $foo = get_foo();
if ($snargle = 3 && $foo = 2) {
...
   # lots of other stuff here...
}
do_something($foo);

grep { $_->[2] } @slice_me;