my $fakeq=new CGI;
$fakeq->{'.cookies'}->{ID1}=$cookieobj1;
$fakeq->{'.cookies'}->{ID2}=$cookieobj2;
.....
$ftokenobj=valid_login($fakeq)
die "Should not happen!" unless $ftokenobj;