#!/usr/bin/env perl
#
# This script sends waste reports additionally to Merton's
# Open311 endpoint. They have already been sent to Echo.

use v5.14;
use warnings;

BEGIN {    # set all the paths to the perl code
    use File::Basename qw(dirname);
    use File::Spec;
    my $d = dirname(File::Spec->rel2abs($0));
    require "$d/../../setenv.pl";
}

use FixMyStreet::Script::Merton::SendWaste;

my $send = FixMyStreet::Script::Merton::SendWaste->new;

exit unless $send->echo_available;

$send->check_payments;
$send->send_reports;
$send->send_comments;