if ($INPUT{'onething'} eq "onething") { &onething; }
elsif ($INPUT{'onething'} eq "twothing")  {&twothing; }
elsif ($INPUT{'threething'}) {threething; }
else {&formula; }
exit;