ok, diciamo cmq che in Perl avrei fatto una cosa del genere:

codice:
my $extract_start = q||;
my $extract_end   = q||;
($parse)          = ($html =~ /$extract_start(.*?)$extract_end/sg);
quindi in $parse avrei il contenuto in mezzo ai tags