I've been using MARC::Record for a while to extract data using Perl to prepare
it for a publishing package (Ventura). This has all worked well for about a
year until it was spotted that a repeated subfield has been omitted. In the 245
record it is possible to have numerous $n and $p fields which need to be output
with formating between the fields.
My knowledge of PERL isn't too good and I'm struggling to know how to extract
these repeated subfields and place formatting between the subfields in the
prescribed order $a, $b, $n, $p, $c. Both n and p could be repeated several
times.
At the moment I take each field into a variable eg
$Field245c = $record->subfield('245','c');
and then output these as follows
if ($Field245c)
{
$EntryBody = $EntryBody . " -- " . $Field245c;
}
However, this approach assigns the first occurance of a subfield and I haven't
yet discovered a tachnique for accessing further subfields.
All suggestions and approaches welcomed.
Ed Brown
www.go-britain.com
www.solid-us.com
0870 7511112
