# -*- Mode: Perl; indent-tabs-mode: nil; -*- package Wombat::HttpResponse; use base qw(Servlet::Http::HttpServletResponse Wombat::Response); $VERSION = 0; 1; __END__ =pod =head1 NAME Wombat::HttpResponse - internal http response interface =head1 SYNOPSIS =head1 DESCRIPTION This interface extends B<Servlet::Http::HttpServletResponse> and B<Wombat::Response> to provide fields and methods accessible only to the container. =head1 PUBLIC METHODS =over =item getCookies() Return the list of Cookies for this Response. =cut =item getHeader($name) Return the value for the first occurrence of the named response header. For all values, use C<getHeaderValues()>. B<Parameters:> =over =item $name the header name =back =item getHeaderNames() Return a list of all the header names set for this Response. =item getHeaderValues($name) Return the list of values for the named response header. B<Parameters:> =over =item $name the header name =back =item getMessage() Return the status message for this Response. =item getStatus() Return the HTTP status code for this Response. =back =head1 SEE ALSO L<Wombat::Response> =head1 AUTHOR Brian Moseley, bcm@maz.org =cut