() = substr($_,-17) =~ / A
                        (?{ print 'yes' if $::i++>12})
                       /xg;