From 47d24b4cbea6d8364d0718e31cfd2fb92187b7ea Mon Sep 17 00:00:00 2001 From: dakkar Date: Mon, 27 May 2013 17:01:20 +0100 Subject: factored TFL client --- lib/WebService/TFL/Bus/Fields.pm | 77 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 77 insertions(+) create mode 100644 lib/WebService/TFL/Bus/Fields.pm (limited to 'lib/WebService/TFL/Bus/Fields.pm') diff --git a/lib/WebService/TFL/Bus/Fields.pm b/lib/WebService/TFL/Bus/Fields.pm new file mode 100644 index 0000000..b3d555f --- /dev/null +++ b/lib/WebService/TFL/Bus/Fields.pm @@ -0,0 +1,77 @@ +package WebService::TFL::Bus::Fields; +use strict; +use warnings; + +sub stop_return_fields { + qw( + StopPointName + StopID + StopCode1 + StopCode2 + StopPointType + Towards + Bearing + StopPointIndicator + StopPointState + Latitude + Longitude + ); +} + +sub prediction_return_fields { + stop_return_fields(), + qw( + VisitNumber + LineID + LineName + DirectionID + DestinationText + DestinationName + VehicleID + TripID + RegistrationNumber + EstimatedTime + ExpireTime + ), +} + +sub flexible_return_fields { + stop_return_fields, + qw( + MessageUUID + MessageType + MessagePriority + MessageText + StartTime + ExpireTime + ), +} + +sub query_fields { + qw( + StopAlso + Circle + StopPointName + StopID + StopCode1 + StopCode2 + StopPointType + Towards + Bearing + StopPointIndicator + StopPointState + VisitNumber + LineID + LineName + DirectionID + DestinationText + DestinationName + VehicleID + TripID + RegistrationNumber + MessageType + MessagePriority + ); +} + +1; -- cgit v1.2.3