Select Code to Download

    my %restaurants=&queryrestaurants;
    my @restaurantvalues=keys(%restaurants);
...
        $dbh->disconnect;
    return %restaurants;
}

<option value="42">Some Restaurant 200 Main St / 04444</option>