The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

A Factory for creating WWW::EFA::Line objects.

VERSION

    Version 0.01

SYNOPSIS

  my $factory = WWW::EFA::LineFactory->new();

ATTRIBUTES

TODO: RCL 2012-01-22 Documentation

METHODS

line_from_itdServingLine

Returns a WWW::EFA::Line object

  my $location = $factory->line_from_itdServingLine( $doc->findnodes( 'itdServingLine' ) );

Expects an XML::LibXML::Element of XML like this:

<itdServingLine selected="1" code="2" number="S1" symbol="S1" motType="1" realtime="0" direction="Ostbahnhof" valid="Fahrplan (2011)" compound="0" TTB="0" STT="0" ROP="0" type="unknown" spTr="" destID="5" stateless="mvv:01001: :H:s11" trainName="" index="1:0"> <itdNoTrain name="S-Bahn"/> <motDivaParams line="01001" project="s11" direction="H" supplement=" " network="mvv"/> <itdRouteDescText>Freising - Neufahrn - Hauptbahnhof - Ostbahnhof</itdRouteDescText> <itdOperator> <code>01</code> <name>DB Regio AG </name> </itdOperator> </itdServingLine>

COPYRIGHT

Copyright 2011, Robin Clarke, Munich, Germany

AUTHOR

Robin Clarke <perl@robinclarke.net>