Removendo linhas do arquivo que corresponde a 2 cadeias de caracteres

Question

Eu estou tentando remover linhas em um arquivo que contém 2 strings.
Eu estou usando:

perl -i.tmp -ne "print unless /$STRING_A/ and /$STRING_B/" /foo/bar/file.txt  

O resultado é que todas as linhas do arquivo contendo $STRING_A são excluídas, independentemente de $STRING_B também estar na mesma linha.
Qual é o problema aqui? Como posso consertar isso?