HTMLTMPL

 view release on metacpan or  search on metacpan

HTMLTMPL.pm  view on Meta::CPAN

		}
	}

}

sub bailout()
{
	my $mess = splice @_;

	my($retVal) =<<HTML10;
content-type: text/html

<html><head></head>
<body bgcolor=red>
<p>
<font color=white>
<h3>Template Error!</h3>
<center>
$mess
</center>
</p>



( run in 1.699 second using v1.01-cache-2.11-cpan-d7f47b0818f )