$template->param(COINLIFETIME => $COINLIFETIME);
$template->param(FLIPPEDCOINSINDB => $flippedcoinsindb);
$template->param(COINSINDB => $coinsindb);
+ $template->param(HTTP_HOST => $ENV{HTTP_HOST});
print "Content-type: text/html\n\n", $template->output;
}
$template = HTML::Template->new(filename => 'created.html');
$template->param(NEWCOINID => $newcoinid);
- $template->param(HTTP_HOST => $ENV{HTTP_HOST});
}
elsif ( length($requestedcoinid) > 0 ) {
if ( ! exists $coins_db{$requestedcoinid} ) {
$template = HTML::Template->new(filename => 'usecoin.html');
$template->param(REQUESTEDCOINID => $requestedcoinid);
- $template->param(HTTP_HOST => $ENV{HTTP_HOST});
$template->param(COINCREATIONTIME => localtime($coininfo[0])."");
if ( $coininfosize == 1 && $requestedaction eq "" ) {