Hi Perl folks,
This is Clara, working for Virginia Tech library. I have one question
about MARC::Record's append_fields.
If I am creating a new Mark record and have several fields to add, how
should I do? Is it like:
my $record = MARC::Record->new();
my $fields = MARC::Field->new(
'100','','',a=>"$lName, $fName $mName",
'502','','',a=>"Thesis($degree)--Virginia Tech",
...
);
$record->append_fields($fields);
OR
my $record = MARC::Record->new();
my $fields = MARC::Field->new('100','','',a=>"$lName, $fName $mName");
$record->append_fields($fields);
my $fields = MARC::Field->new('502','','',a=>"Thesis($degree)--Virginia
Tech");
$record->append_fields($fields);
And again and again till the end of the record.
Actually I have tried the first method. But when I use "print
record_asformatted()", the output looks funny, only 100 cab be showed.
For "print record_usmarc()", it looks fine.
Meanwhile, I wonder why add_records is not suggested to use. I tried it,
seems it works stable.
Best,
Clara
