Why not adopt me?
This distribution is up for adoption!
If you're interested then please contact the PAUSE module admins via
email.
NAME
WWW::EFA::HeaderFactory - A (very small) Factory for creating WWW::EFA::ResultHeader objects.
VERSION
Version 0.01SYNOPSIS
my $factory = WWW::EFA::HeaderFactory->new();METHODS
header_from_result
Returns a WWW::EFA::ResultHeader object
my $location = $factory->header_from_result( $doc );Expects an XML::LibXML::Element of XML with this as its root element:
<itdRequest version="9.16.27.42" language="de" lengthUnit="METER" sessionID="MVV1_4147296033" client="libwww-perl/6.03" clientIP="192.168.0.190" serverID="MVV1_" virtDir="mobile" now="2011-11-10T15:16:22" nowWD="5"> ... </itdRequest>
COPYRIGHT
Copyright 2011, Robin Clarke, Munich, Germany
AUTHOR
Robin Clarke <perl@robinclarke.net>