sub new
{
    my ($class,$lite_request)=@_;
    return bless [ $lite_request ],$class;
}

sub param
{
    my ($self,$name)=@_;
    return $self->[0]->param($name);
}

sub cookie
{
    my ($self,$name)=@_;
    return $self->[0]->cookie($name)->value();
}