$string_to_match='QWERTAAWAAAAKAAAAAAAA';';

##</code><code>##

$check = substr($string_to_match, -17, 17);
if ($check=~/A{14,17}/)
       {print "correct";}