my ($days, $hours, $min, $secs);
   if ($time=~/(\d+)-(\d{2}):(\d{2}):(\d{2})/){
      $days=$1;
      $hours=$2;
      $mins=$3;
      $secs=$4;
   }elsif($time=~/(\d{2}):(\d{2}):(\d{2})/){
      $hours=$1;
      $mins=$2;
      $secs=$3;
   }else{
      ($mins,$secs)=split/:/,$time;
   }
   my $day_sec=$days*86400;
   my $hour_sec=$hours*3600;
   my $min_sec=$mins*60;
   my $secs_running=$day_sec+$hour_sec+$min_sec+$secs;