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