$string =~ m/substring/