use v5.18.0;
use warnings;

my $pattern = "(?<!ss)abc";
my $regex = qr/$pattern/iaa;
say 'ok' if 'ssqabc' =~ $regex;
say 'ok' if 'ssabc'  !~ $regex;
say 'ok' if 'ssßabc' =~ $regex;