Re: Using MARC::Record to delete fields

[Ed Summers]

I can see where Bryan was going with this--but unfortunately
delete_field() does not operate on a list of fields!! I just checked
in delete_fields() and a test for it...but that's not going to help
Michael right now. Here's how I'd delete all but the first 035:

   # get a list of all 035 fields in the record
   my @m035s = $record->field('035');

   # remove the first 035 from the list
   shift(@m035s);

   # delete any that remain in the list
   foreach $field (@m035s) {
       $record->delete_field($field);
   }

This will work with records where there are zero or one 035s as well.
Does it make sense?

//Ed