sub {(index ($_[0]->as_text, '4') == -1) && ($_[0]->as_text =~ /(met)/i) }