$string = "a:b::c   d";
  @fields = $string =~ /([^:]*):+([^:]+):+(\S+)\s*(\S+)/;