my $name   = $q->param('name')   || 'noname';
my $day    = $q->param('day')    || 'noday';
my $number = $q->param('number') || 'nonumber';

##</code><code>##

print $q->header,
$q->start_html( -title => "Add user", -bgcolor => "#ffffff"),
$q->p("Data submitted"),
$q->tt("$name<br/>$day<br/>$number"),
$q->end_html;