my $self = { r => CGI->new(), html => undef, redir => undef, };