Select Code to Download

my $error_cnt = 0;
my $day_cnt = 0;
...
close(OUT);                                                           
+ close(OUT1);
print "\n\nTotal number of timespans of 8m 32s removed is: $error_cnt\
+n";
close(INP);