print " <form action=test.cgi method=post>\n";
print " <center><select name='selected' size=1>\n";
print " <option value='$item1'".($input{selected} eq $item1 ? " selected" : "")."> $item1</option>\n";
print " <option value='$item2'".($input{selected} eq $item2 ? " selected" : "")."> $item2</option>\n";
print " <option value='$item3'".($input{selected} eq $item3 ? " selected" : "")."> $item3</option>\n";
print " <option value='$item4'".($input{selected} eq $item4 ? " selected" : "")."> $item4</option>\n";
print " <option value='$item5'".($input{selected} eq $item5 ? " selected" : "")."> $item5</option>\n";
print " <INPUT type=submit name=submit value=Select\n"; 
print " </form><p><br>\n"; 
print " </select>\n";