Select Code to Download

sub convFieldToXML($) {
  my $fldref = shift;
...
    # snip --8<--;
  }
}

fldref=
[
...
  ["\$h", "P|ysti, Lasse"],
  ["\$j", "Fran*8aix, Jean"],
]

fldref=
[
...
  \["\$h", "P|ysti, Lasse"],
  \["\$j", "Fran*8aix, Jean"],
]