| HTTP-Body documentation | Contained in the HTTP-Body distribution. |
HTTP::Body::XForms - HTTP Body XForms Parser
use HTTP::Body::XForms;
HTTP Body XForms Parser. This module parses single part XForms submissions, which are identifiable by the content-type application/xml. The XML is stored unparsed on the parameter XForms:Model.
This method is overwrited to set the param XForms:Model with the buffer content.
Daniel Ruoso, daniel@ruoso.com
This library is free software . You can redistribute it and/or modify it under the same terms as perl itself.
| HTTP-Body documentation | Contained in the HTTP-Body distribution. |
package HTTP::Body::XForms; BEGIN { $HTTP::Body::XForms::VERSION = '1.12'; } use strict; use base 'HTTP::Body'; use bytes; use File::Temp 0.14;
sub spin { my $self = shift; return unless $self->length == $self->content_length; $self->body($self->{buffer}); $self->param( 'XForms:Model', $self->{buffer} ); $self->{buffer} = ''; $self->{state} = 'done'; return $self->SUPER::init(); }
1;