um in ur regex's

if ($regex(%sresults,/is misspelled/Sig)) {
if ($regex(%sresults,/is spelled correctly/Sig)) {
if ($regex(%sresults,/^(\w+)<BR>$/Sig)) {

may i ask why are you using /Sig ?

also if you are going to use regex's you should know how to use them the right way.
i showed you a way that got you away from setting global vars yet in the update you posted you are setting global vars again. =/

and then you are using an alias $nohtml that you did not include.