BEGIN { # yes the indenting is off, deal with it
#add the words to check here:
@evilwords = qw(
+CONTANTS
anyways
arbitary
custemer
dependan
existance
existant
-paramater
-varsion
fomr
+invoce
+paramater
+puchase
puhs
+sekf
+sucess
+varsion
);
$testcount = scalar(@Support::Files::testitems);