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