[perl #129044] [BUG] `.first($regex)` throws error on element that doesn't support method .match

[via RT]

# New Ticket Created by  Sam S. 
# Please include the string:  [perl #129044]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=129044 >


These work fine:

    say /a/.ACCEPTS: (a=>2);  # ｢a｣
    say (a=>2) ~~ /a/;        # ｢a｣

But this fails:

    say (a=>2,).first(/a/);   # ERROR: Method 'match' not found for invocant of 
class 'Pair'

IRC discussion:

    smls:  ^^ This is a bug, right?
    smls:  Looks like .first might be cutting corners by calling
           $element.match($predicate)  instead of  $predicate.ACCEPTS($element)
           in case of a regex predicate
    jnthn: Looks like