Select Code to Download

next unless  /Synchronizing started|Synchronizing finished|Summary/;
my @date= m|(\d+)/(\d+)/(\d+)|;

my @date;
if (@date = m{(\d+)/(\d+)/(\d+)}) {
  ...
}

my %times;
my $job;
...
  }
}
print Dumper(\%times); use Data::Dumper;