in reply to Benchmarking String::Approx

You can't just eval that string, try:
cmpthese (-5,{ me => sub { mymatch($str,2,\@arr) }, jk => sub { amatch($str,['2'],@arr) } );