if ($questions{"three"} eq "false")
{
   $right++;
   
}
else
{
   $wrong++;
}