for ( my $i = 0;  $i < scalar(@builds); $i++ )  {

      my ($str, $date, $time) = split(' ', `/msg/spgear/tools/bin/csetool fabx describe --milestone V${builds[$i]} | grep firstReportTime | head -1`);

      $time{$builds[$i]} =>  {
                            'start_date' => $date,
                            'start_time' => $time,
                            'group' => 'integration'

                            };

      if ( $i != 0 )  {

         $time{$previous} => {
                           'end_date' => $date,
                           'end_time' => $time
                            };
      }

      $previous = $builds[$i];
   }

   print "$_ $_->{'start_date'} <br> \n" for (sort keys %time);