$hoge{$hensuu} = " selected";

print qq{<OPTION VALUE="10"$hoge{10}>10\n};
以下略

"をエスケープするのは個人的に好きじゃない