diff options
author | dakkar <dakkar@thenautilus.net> | 2013-05-27 16:38:46 +0100 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2013-05-27 16:38:46 +0100 |
commit | 8419b80b1b206262c42fee46cb2b9cc632904509 (patch) | |
tree | 3b5a0358791211a9f2b47f6d53365f3417e307f6 /bus.pl | |
parent | kill debug warns (diff) | |
download | HomePanel-8419b80b1b206262c42fee46cb2b9cc632904509.tar.gz HomePanel-8419b80b1b206262c42fee46cb2b9cc632904509.tar.bz2 HomePanel-8419b80b1b206262c42fee46cb2b9cc632904509.zip |
kill debug Data::Printer
Diffstat (limited to 'bus.pl')
-rw-r--r-- | bus.pl | 16 |
1 files changed, 0 insertions, 16 deletions
@@ -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; |