Possible, but better?

/(?=^.*abc)(?=^.*pqr)(?=^.*xyz)/ and print "$_:matched" 
    for qw[ abcpqrxyz xyzpqrabc pqrxyzabc abpqrxyz];;
abcpqrxyz:matched
xyzpqrabc:matched
pqrxyzabc:matched
[download]