my $user = ( $q->param('user') =~ /\w/ ) ? $q->param('user') : "Anonymous";