#!/usr/bin/perl

use Mysql;

require 'inc.perl';
require 'article.inc';
require 'inc.country';

$template='register.fmt';

&start;
$user{'compday'}=int((time()/(60 * 60 * 24)));
$user{'adventday'} = $user{'compday'} - 11656;

if ($form{id}) {
	$form{id} =~ /^(\d)/;
	$extra{'cont-dir'}=$contentdir.$1;
}

&spamtemplate($template);