sed - awk show x by not y

Question

これらを 1 つの行に組み合わせて、もう少し効率的にすることは可能ですか。

awk '$4 ~/^[x]/' raw.txt > x_raw.txt
awk '!/y/' x_raw.txt > xy_raw.txt

おそらくperlでこれは可能ですか？