$find1='%'; if ($field2_b ne "") { s/[^$find1]?^/\^/,s/[$find1]?$/+/ for $field2_b }; if ($field1 =~ /$field2_b/i) { print "fields have pattern matching \n";