diff --git a/stack-years.pl b/stack-years.pl index c901c33..9499726 100644 --- a/stack-years.pl +++ b/stack-years.pl @@ -1,7 +1,7 @@ #!/usr/bin/perl -w use strict; -use diagnostics; +# use diagnostics; use DBI; use POSIX; use Data::Dumper; @@ -15,7 +15,6 @@ my $getdata_st = $db->prepare("select strftime('2000-%m-%dT%H:%M:%S.000Z', times $years_st->execute($station); my @years = @{$years_st->fetchall_arrayref}; -print STDERR Dumper(@years); my %data; foreach my $y_ref (@years) {