if( m/^\s*-([\w-]+)   \s*:\s*(.*)$/)
  { ($field, $val)= ($1, $2); }
elsif( m/^\s*(.*)?$/)
  { $val= $1; }
$val=~s/,$//;