print "Hello John, Goodbye John" =~ /Hello (John), Goodbye ($1)/; print ", "; print "Hello May, Goodbye May" =~ /Hello (\w+), Goodbye ($1)/; print ", "; print "Hello May, Goodbye John" =~ /Hello (\w+), Goodbye ($1)/;