blob: ba82c4b9149f39812c39380b528e94e001c66fba (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
use strict; use warnings; use 5.014; use LWP::Simple; use URI; use URI::QueryParam; my $base = URI->new('http://countdown.api.tfl.gov.uk/interfaces/ura/instant_V1'); $base->query_form({ StopPointName => 'Hotspur Road',
ReturnList => 'StopID,StopCode1,VisitNumber,TripID,VehicleID,LineID,LineName,DirectionID,DestinationText,DestinationName,EstimatedTime', }); say get($base);
|