if ($internetpost =~ /@/ and $internetpost =~ /\./ ) {goto SecondCheckOK;}