sub createSession{
	my ($userId) = @_;
	$appSession = CGI::Session->new();
	$appSession->param(-name=>'userId', -value=>$userId);
	$appSession->param(-name=>'userHash', -value=>$appSession->id());
	$appSession->expire("userId", &getSessionExpireTime);
	return $appSession->id();
}