my ($ace_hour_start,$ace_min_start,$ace_sec_start) =
  (split/:/, $ace_start_time);
   $ace_hour_start = $ace_hour_start * 100;
   $ace_min_start = $ace_min_start * 10;
   $ace_start_time = $ace_hour_start + $ace_min_start + $ace_sec_start;
 
my ($ace_hour_stop,$ace_min_stop,$ace_sec_stop) = 
 (split/:/, $ace_stop_time);
  $ace_hour_stop = $ace_hour_stop * 100;
  $ace_min_stop = $ace_min_stop * 10;
  $ace_stop_time = $ace_hour_stop + $ace_min_stop + $ace_sec_stop;