From 0f6feddd30bc0e2d0467084b283b25124de7d39e Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 1 Sep 2015 10:17:27 +0200 Subject: TODO --- lib/Travel/Status/DE/IRIS.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lib/Travel/Status/DE/IRIS.pm b/lib/Travel/Status/DE/IRIS.pm index c2b2c5a..5dc4cf2 100644 --- a/lib/Travel/Status/DE/IRIS.pm +++ b/lib/Travel/Status/DE/IRIS.pm @@ -54,6 +54,9 @@ sub new { my $xml_st = XML::LibXML->load_xml( string => $res_st->decoded_content ); $self->{nodes}{station} = ( $xml_st->findnodes('//station') )[0]; + # TODO parse 'meta' and maybe 'p' flags + # They're optional pointers to related platforms. For instance + # Berlin Hbf/BL -> Berlin HBf (tief), Berlin Hbf (S), ... if ( not $self->{nodes}{station} ) { $self->{errstr} -- cgit v1.2.3