package SOAPjr::message; use strict; use warnings; =head1 NAME SOAPjr::message - base class for SOAPjr::request and SOAPjr::response objects =head1 VERSION Version 1.0.1 =cut our $VERSION = "1.0.1"; =head1 SYNOPSIS See perldoc SOAPjr for more info. =cut use base qw(SOAPjr::base); sub _init { my $self = shift; delete $self->{MOBject_structure}->{ENVELOPE}; delete $self->{MOBject_structure}->{OPTIONS}; return $self->SUPER::_init(@_); } =head1 AUTHOR Rob Manson, =head1 BUGS Please report any bugs or feature requests to C, or through the web interface at L. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. =head1 SUPPORT You can find documentation for this module with the perldoc command. perldoc SOAPjr You can also look for information at: =over 4 =item * SOAPjr.org L =item * RT: CPAN's request tracker L =item * AnnoCPAN: Annotated CPAN documentation L =item * CPAN Ratings L =item * Search CPAN L =back =head1 ACKNOWLEDGEMENTS See L for further information on related RFC's and specifications. =head1 COPYRIGHT & LICENSE Copyright 2008 Rob Manson, Sean McCarthy and http://SOAPjr.org, some rights reserved. This file is part of SOAPjr. SOAPjr is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. SOAPjr is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with SOAPjr. If not, see . =cut 1;