diff options
author | Daniel Friesel <derf@finalrewind.org> | 2011-06-23 16:47:12 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2011-06-23 16:47:12 +0200 |
commit | 13b9dcdf70eb95c74e8971122bbe5b268b81bd50 (patch) | |
tree | b629e31d47d06e35427f266a5f9b33cb69c086b1 /lib/Net/Travel/DE/VRR/Route.pm | |
parent | 2a1d17f8d50aacd9de082139e76c55ee40199a15 (diff) |
Rename to Travel::Routing::DE::VRR
Diffstat (limited to 'lib/Net/Travel/DE/VRR/Route.pm')
-rw-r--r-- | lib/Net/Travel/DE/VRR/Route.pm | 99 |
1 files changed, 0 insertions, 99 deletions
diff --git a/lib/Net/Travel/DE/VRR/Route.pm b/lib/Net/Travel/DE/VRR/Route.pm deleted file mode 100644 index 7089120..0000000 --- a/lib/Net/Travel/DE/VRR/Route.pm +++ /dev/null @@ -1,99 +0,0 @@ -package Net::Travel::DE::VRR::Route; - -use strict; -use warnings; -use 5.010; - -use Net::Travel::DE::VRR::Route::Part; - -our $VERSION = '1.3'; - -sub new { - my ( $obj, @parts ) = @_; - - my $ref = {}; - - for my $part (@parts) { - push( - @{ $ref->{parts} }, - Net::Travel::DE::VRR::Route::Part->new( %{$part} ) - ); - } - - return bless( $ref, $obj ); -} - -sub parts { - my ($self) = @_; - - return @{ $self->{parts} }; -} - -1; - -__END__ - -=head1 NAME - -Net::Travel::DE::VRR::Route - Single route (connection) between two points - -=head1 SYNOPSIS - - for my $route ( $efa->routes() ) { - for my $part ( $route->parts() ) { - # $part is a Net::Travel::DE::VRR::Route::Part object - } - } - -=head1 VERSION - -version 1.3 - -=head1 DESCRIPTION - -Net::Travel::DE::VRR::Route describes a single method of getting from one -point to another. It holds a bunch of Net::Travel::DE::VRR::Route::Part(3pm) -objects describing the parts of the route in detail. Each part depends on the -previous one. - -You usually want to acces it via C<< $efa->routes() >>. - -=head1 METHODS - -=over - -=item my $route = Net::Travel::DE::VRR::Route->new(I<@parts>) - -Creates a new Net::Travel::DE::VRR::Route elements consisting of I<parts>, -which are Net::Travel::DE::VRR::Route::Part elements. - -=item $route->parts() - -Returns a list of Net::Travel::DE::VRR::Route::Part(3pm) elements describing -the actual route. - -=back - -=head1 DIAGNOSTICS - -None. - -=head1 DEPENDENCIES - -None. - -=head1 BUGS AND LIMITATIONS - -None known. - -=head1 SEE ALSO - -Net::Travel::DE::VRR(3pm), Net::Travel::DE::VRR::Route::Part(3pm). - -=head1 AUTHOR - -Copyright (C) 2011 by Daniel Friesel E<lt>derf@finalrewind.orgE<gt> - -=head1 LICENSE - - 0. You just DO WHAT THE FUCK YOU WANT TO. |