$str =~ s/($query)/$1<\/em>/ig;