#!/usr/local/bin/perl
use CGI qw(:standard);

print header;
print start_html('Lincoln Stein Rocks the Perlmonk Example'),
    h1('Perlmonk Example'),
    start_form,
    "What's the combination?",p,
    checkbox_group(-name=>'words',
	 
-values=>'eenie','meenie','minie','moe'],

##</code><code>##

p,
    "What's your favorite color? ",
    popup_menu(-name=>'color',
	       -values=>'red','green','blue','chartreuse']),
    p,
    submit,
    end_form,
    hr;
print end_html;