Select Code to Download

    ## And extract the comments
    next unless $contents =~ m[ <!--begin--> (.+) <!--end\s--> ]six;

#! perl -slw
use strict;
...
<b>Comment 2</b><br>
J H<br>
Clearwater, FL USA - Wed 01/04/2006 - 02:05:12