open CMD, "/bin/ping -c $count -i $interval -s $packetsize -w $allowableTime $host |" or die "Can't open ping: $!";
#print "$success \n";
my (@values1,@val1,@values2,@val2,@values3,@values4,@values5); 
 while (<CMD>) {
     
    if ( $_ =~ /PING/ ){
           @values1 = split ;
          @val1 = split(/\(/,$values1[3]); 
         $val1[1] =~ s/\)//;
           }  
    
      if ($. == 2) {
        @values2 = split;
          @val2 = split(/\=/ , $values2[5]);
           }
      if ($_ =~ /packets/) {
          #print "$_ ";
         @values3 = split;
          }
      if ($_ =~ /^rtt/) {
           #print "$_ ";
        @values4 = split /\=/;
         @values5 = split(/\// ,$values4[1]);
        }
   }