summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/Travel/Status/DE/DeutscheBahn.pm106
-rw-r--r--lib/Travel/Status/DE/HAFAS.pm2
2 files changed, 1 insertions, 107 deletions
diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm
deleted file mode 100644
index 55a8061..0000000
--- a/lib/Travel/Status/DE/DeutscheBahn.pm
+++ /dev/null
@@ -1,106 +0,0 @@
-package Travel::Status::DE::DeutscheBahn;
-
-use strict;
-use warnings;
-use 5.014;
-
-use parent 'Travel::Status::DE::HAFAS';
-
-our $VERSION = '6.15';
-
-sub new {
- my ( $class, %opt ) = @_;
-
- $opt{service} = 'DB';
-
- return $class->SUPER::new(%opt);
-}
-
-1;
-
-__END__
-
-=head1 NAME
-
-Travel::Status::DE::DeutscheBahn - Interface to the online arrival/departure
-monitor operated by Deutsche Bahn
-
-=head1 SYNOPSIS
-
- use Travel::Status::DE::DeutscheBahn;
-
- my $status = Travel::Status::DE::DeutscheBahn->new(
- station => 'Essen Hbf',
- );
-
- if (my $err = $status->errstr) {
- die("Request error: ${err}\n");
- }
-
- for my $departure ($status->results) {
- printf(
- "At %s: %s to %s from platform %s\n",
- $departure->datetime->strftime('%H:%M'),
- $departure->line,
- $departure->destination,
- $departure->platform,
- );
- }
-
-=head1 VERSION
-
-version 6.15
-
-=head1 DESCRIPTION
-
-Travel::Status::DE::DeutscheBahn is an interface to the Deutsche Bahn
-departure monitor available at
-L<https://reiseauskunft.bahn.de/bin/mgate.exe>.
-
-It takes a station name and (optional) date and time and reports all arrivals
-or departures at that station starting at the specified point in time (now if
-unspecified).
-
-=head1 METHODS
-
-=over
-
-=item my $status = Travel::Status::DE::DeutscheBahn->new(I<%opts>)
-
-Requests the departures/arrivals as specified by I<opts> and returns a new
-Travel::Status::DE::HAFAS element with the results. Dies if the wrong
-I<opts> were passed.
-
-Calls Travel::Status::DE::HAFAS->new with service = DB. All I<opts> are passed
-on. Please see Travel::Status::DE::HAFAS(3pm) for I<opts> documentation
-and other methdos.
-
-=back
-
-=head1 DIAGNOSTICS
-
-See Travel::Status::DE::HAFAS(3pm).
-
-=head1 DEPENDENCIES
-
-=over
-
-=item * Travel::Status::DE::HAFAS(3pm)
-
-=back
-
-=head1 BUGS AND LIMITATIONS
-
-See Travel::Status::DE::HAFAS(3pm).
-
-=head1 SEE ALSO
-
-Travel::Status::DE::HAFAS(3pm).
-
-=head1 AUTHOR
-
-Copyright (C) 2015-2022 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
-
-=head1 LICENSE
-
-This module is licensed under the same terms as Perl itself.
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm
index b73a2a8..e71e9f0 100644
--- a/lib/Travel/Status/DE/HAFAS.pm
+++ b/lib/Travel/Status/DE/HAFAS.pm
@@ -1204,7 +1204,7 @@ of this module's features. Set B<hafas=>I<service> to use a specific service.
=head1 AUTHOR
-Copyright (C) 2015-2024 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
+Copyright (C) 2015-2025 Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
=head1 LICENSE