$str =~ m/(stuff)/; print $1