perl -nle" print "$ARGV:($./$+[0]): $1" if m[([AN]{10,}]g;" file*

##</code><code>##

filename:(10/50): ANNNANANAAN