$ perl -e'/(?<!ss)a/i'