- or download this
if($content=~m|<BODY.*?>(.*?)</BODY>|si) {
$content = $header_html . $1 . $footer_html;
...
print "Couldn't parse\n";
}
- or download this
my $header_html= 'C:/My Documents/carlist/carlist_test/template/cchead
+er.html';
my $footer_html= 'C:/My Documents/carlist/carlist_test/template/ccfoot
+er.html';
- or download this
$content = $header_html . $1 . $footer_html;