else{
     print "<option value=\"$_\" selected>  $_  \n";
     $first=1;
     }

##</code><code>##

print qq!<option value="$_" selected>  $_  \n!;