my %name_menu;
for (0..$elements) {
    $name_menu{$_} = qq{
<select size="1" name="M$_">
$fname
<option>GUEST</option>
<option selected>Select a member</option>
</select>
};
}