print html_header;
print "hellow world";

##</code><code>##

use HTML::Mason;
my $interp = HTML::Mason::Interp->new ();
?????