WWW::NationalRail 0.1

WWW::NationalRail is a Perl interface to the UK national rail timetable.

SYNOPSIS

 use WWW::NationalRail;

 my $rail = WWW::NationalRail->new({
 from => "London",
 to => "Cambridge",
 out_date => "18/12/05",
 out_type => "depart",
 out_hour => 9,
 out_minute => 0,
 ret_date => "18/12/05",
 ret_type => "depart",
 ret_hour => 17,
 ret_minute => 0,
 });

 $rail->search or die $rail->error();

 my $os = $rail->outward_summary; # array reference
 my $rs = $rail->return_summary;

 $os->[0]{depart} # "09:06"
 $os->[0]{arrive} # "10:25"
 $os->[0]{changes} # "0"
 $os->[0]{duration} # "1:19"

 my $od = $rail->outward_detail;
 my $rd = $rail->return_detail;

 $od->[0]->{duration}; # "1:19"

 my $legs = $od->[0]{legs} # array reference

 $legs->[0]{station} # "LONDON KINGS CROSS"
 $legs->[0]{arrive} # undef
 $legs->[0]{depart} # "09:06"
 $legs->[0]{travelby} # "Train"
 $legs->[0]{operator} # "WAGN RAIL"

 $rail->ret_hour(19); # change search parameters
 $rail->search(); # and search again


Product's homepage

Requirements:

· Perl