Select Code to Download

  print $query->popup_menu(-name=>'userid',
                            -values=>\@users);

# open the text database
    unless(open(PFD,$db))
...
        }
    }
    close(PFD);