Select Code to Download

my $start_pattern = qr/.... $date/;
my $end_pattern = qr/.... $date/;
...
         /$send_pattern/;
  }
}

while (<LOG>) {
  if (/$start_pattern/..1) {
...
         /$send_pattern/;
  }
}