cmpthese (-5,{ me => sub { mymatch($str,2,@arr) },
               jk => sub { amatch($str,['2'],@arr) },
             });