my ($field, $value) = $_ =~ /^(.*?):(.*)$/

##</code><code>##

  my ($field, $value) = $_ =~ /^(.*(?:\\\\)*)(?<!\\):(.*)$/