$_ = "c a";
if (/a/g/ and /c/g) { ... }