From 8419b80b1b206262c42fee46cb2b9cc632904509 Mon Sep 17 00:00:00 2001 From: dakkar Date: Mon, 27 May 2013 16:38:46 +0100 Subject: kill debug Data::Printer --- bus.pl | 16 ---------------- 1 file changed, 16 deletions(-) delete mode 100644 bus.pl (limited to 'bus.pl') diff --git a/bus.pl b/bus.pl deleted file mode 100644 index 0e25ead..0000000 --- a/bus.pl +++ /dev/null @@ -1,16 +0,0 @@ -#!/usr/bin/env perl -use strict; -use warnings; -use 5.014; -use TFL::Bus; -use Data::Printer; - -my $bus = TFL::Bus->new(); - -my $res = $bus->request(TFL::Bus::Request->new({ - StopPointName => 'Hotspur Road', - #Towards => 'Islip Manor', - ReturnList => [qw(StopID StopCode1 VisitNumber TripID VehicleID LineID LineName DirectionID DestinationText DestinationName EstimatedTime)], -})); - -p $res; -- cgit v1.2.3