Select Code to Download

# snippet...
open(TIMELOG,">timelog.txt") || die $!;
print TIMELOG time;
close(TIMELOG);

open(TIMELOG,"<timelog.txt") || die $!;
my $stored_time = <TIMELOG>;
...
if (time < $stored_time) {
  ... do something because time now is earlier than stored
}