# 8 quoted chars
my $string = ('AB'x2).'CABCAC'x2;