Fetching contributors…
Cannot retrieve contributors at this time
executable file 22 lines (15 sloc) 386 Bytes
#!/usr/bin/env perl
use strict;
use warnings;
require 5.8.0;
use DateTime;
use FixMyStreet::App;
use Open311;
use Open311::GetServiceRequestUpdates;
my $start_time = DateTime->now->subtract( days => 1, hours => 1 );
my $end_time = DateTime->now;
my $updates = Open311::GetServiceRequestUpdates->new(
start_date => $start_time,
end_date => $end_time,
);
$updates->fetch;