Select Code to Download

my $fetch;
$fetch = sub {
...
...
$fetch->();
...

use feature qw( current_sub );

...
...
$fetch->();
...