I would like to thank everyone for their help
I currently have:

foreach(@info){
   $_=~ s/^\s+//;
   @str = split;
         if( $myhash{$str[2]}{$str[0]} ){ # if same connection type al
+ready stored

           ( $myhash{$str[2]}{$str[0]}[0] ) += $str[0];
           ( $myhash{$str[2]}{$str[0]}[1] ) += $str[4];
           ( $myhash{$str[2]}{$str[0]}[2] ) += $str[5];
           ( $myhash{$str[2]}{$str[0]}[3] ) += $str[6];
           ( $myhash{$str[2]}{$str[0]}[4] ) += $str[7];
           ( $myhash{$str[2]}{$str[0]}[5] ) += $str[8];
           ( $myhash{$str[2]}{$str[0]}[6] ) += $str[9];
           ( $myhash{$str[2]}{$str[0]}[7] ) += $str[12];
           ( $myhash{$str[2]}{$str[0]}[8] ) += $str[13];
           ( $myhash{$str[2]}{$str[0]}[9] ) += $str[16];

          }
          else{# if connection type is not stored
             push(@temp, $str[0], $str[4], $str[5], $str[6], $str[7], 
+$str[8], $str[9], $str[12], $str[13], $str[16]);
             $myhash{$str[2]}{$str[0]} = [@temp];  #enter new data
          }
      
}
[download]

My next step will be determining how to print, I was using the code below but I will change that

foreach my $element(sort keys %myhash){
  printf OUT ("%-20s", $element);
  foreach (@{$myhash{$element}}){
    printf OUT ("%8s", $_);  
  }
  print OUT "\n";
}#foreach
[download]

thanks everyone