perl -le " print for grep ?? .. /Q/, @ARGV " a b c Q r s
___
a
b
c
Q