summaryrefslogtreecommitdiff
path: root/bus.pl
diff options
context:
space:
mode:
authordakkar <dakkar@thenautilus.net>2013-05-27 16:38:46 +0100
committerdakkar <dakkar@thenautilus.net>2013-05-27 16:38:46 +0100
commit8419b80b1b206262c42fee46cb2b9cc632904509 (patch)
tree3b5a0358791211a9f2b47f6d53365f3417e307f6 /bus.pl
parentkill debug warns (diff)
downloadHomePanel-8419b80b1b206262c42fee46cb2b9cc632904509.tar.gz
HomePanel-8419b80b1b206262c42fee46cb2b9cc632904509.tar.bz2
HomePanel-8419b80b1b206262c42fee46cb2b9cc632904509.zip
kill debug Data::Printer
Diffstat (limited to 'bus.pl')
-rw-r--r--bus.pl16
1 files changed, 0 insertions, 16 deletions
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;