my $input = CGI->new();

### bunch of other stuff ###

if ($status eq APPROVED) 
	{ 
	my $tnum = $user->db_number;
	my $cookie=$input->cookie(-name=>'hs_ident', -value=>"$tnum");
	print "login - $status\n$tnum\n$member\n" if $Debug;
	print $input->redirect( -location=>"$member" , -cookie=>$cookie, -nph=>1);
	}