Select Code to Download

sub browse {
    my ($url) = @_;
...
    }->{$^O}    || sub { system qq{xdg-open "$url" &} };
    $action->();
}