Select Code to Download

my $hash_ref = {
                "1" => "Peter",
                "2" => "David"
        };

print $cgi->popup_menu(-name=>'menu_name',
                  -values=>$hash_ref);