foreach $p ( @patterns ) {
	if ( ??? grep /$p/, @values ) {
		modify the matching list value;
	} else {
		push @values, "strings $pattern";
	}
}