Travel::Routing::DE::VRR - unofficial interface to the efa.vrr.de German itinerary service

Author

       Copyright (C) 2009-2021 by Birte Kristina Friesel <derf@finalrewind.org>

Bugs And Limitations

       None known.

Dependencies

       •   Travel::Routing::DE::EFA(3pm)

       •   LWP::UserAgent(3pm)

       •   XML::LibXML(3pm)

Description

Travel::Routing::DE::VRR is a client for the efa.vrr.de web interface.  You pass it the start/stop of
       your journey, maybe a time and a date and more details, and it returns the up-to-date scheduled
       connections between those two stops.

License

       This program is licensed under the same terms as Perl itself.

perl v5.36.0                                       2023-11-27                      Travel::Routing::DE::VRR(3pm)

Methods

       $efa = Travel::Routing::DE::VRR->new(%opts)
           Returns a new Travel::Routing::DE::VRR object and sets up its POST data via %opts.

           Calls  Travel::Routing::DE::EFA->new  with  the  appropriate  efa_url,  all  %opts are passed on. See
           Travel::Routing::DE::EFA(3pm) for valid parameters and methods

       When encountering an error, Travel::Routing::DE::VRR  throws  a  Travel::Routing::DE::EFA::Exception(3pm)
       object.

Name

       Travel::Routing::DE::VRR - unofficial interface to the efa.vrr.de German itinerary service

Synopsis

               use Travel::Routing::DE::VRR;

               my $efa = Travel::Routing::DE::VRR->new(
                       origin      => [ 'Essen',    'HBf' ],
                       destination => [ 'Duisburg', 'HBf' ],
               );

               for my $route ( $efa->routes ) {
                       for my $part ( $route->parts ) {
                               printf(
                                       "%s at %s -> %s at %s, via %s to %s",
                                       $part->departure_time, $part->departure_stop,
                                       $part->arrival_time,   $part->arrival_stop,
                                       $part->train_line,     $part->train_destination,
                               );
                       }
                       print "\n\n";
               }