$_ = "abcdmefg";
if (($pos = index($_, 'm')) >= 0) {
  print "found 'm' at ", $pos, "\n";
}