$webpage =~ s/.+<\/head>//sgi; ##

##

$webpage =~ s/|<\/html>||<\/body>//sgi;

##

##

$webpage =~ s///sgi;