Someone

if ($page eq '1'){   $error = "ZIP Code<br>\n" unless $zip;   $error .= "Subscription Type<br>\n" unless $subtype;   if ($error ne ''){      &parse('error.html');   } else {      if ($subtype eq '1'){         &parse ('index2.html');      } else {         &parse ('index-r.html');      }   }}