Select Code to Download

my $TIMESTAMP;
...
for (@dates) {
     $TIMESTAMP = $_->[0]->strftime("%Y-%m-%d %R");
}

my $TIMESTAMP = $dates[-1][0]->strftime("%Y-%m-%d %R");

my @log_final;
my $last = 0;
...
    }
    unshift @log_final, $log_line;
}