Select Code to Download

foreach my $i ( 1 .. $scheduled_export_days ){

...
  my ($hr,$min) = split /:/, $tmp[1];    
  return ("$hr:$min",$tmp[0]);
}