That one is easy.... use a regex:

#!/usr/bin/perl
use strict

my $string = "stuff, Hello the name of this site is perlmonks.org, goo
+dbye, stuff";

my ($newstring) = ($string =~ /Hello(.*?)goodbye/);
print "'$newstring'\n";
[download]

-Blake