Select Code to Download

sub handle_foo {
    my $message= 'Example';
...
    };
    ...
};

sub fetch_item {
    my( $item, $on_success )= @_;
...
            },
    };
};

sub fetch_item {
    my( $item, $on_success )= @_;
...
            },
    };
};