if ($wp =~ m/$code1/ and $wp =~ m/$code2/) {...