I am having trouble using insert_grouped_field(). The code below returns
a "Undefined subroutine &main::insert_grouped_field called at ./test
line 11." As you can see from the code, I am testing for the version of
the perl module I'm using and the program prints out the VERSION as
1.29. Suggestions?

use MARC::Batch;
use MARC::Record;
use MARC::Field;
print "$MARC::Record::VERSION\n";
my $batch = MARC::Batch->new('USMARC','bib');

while (my $record = $batch->next())
{
        my $new_field = MARC::Field->new('362','','','a' => 'v.1-
(1998)-');
        insert_grouped_field($new_field);

        print $record->as_formatted();

}

Anne L. Highsmith
Consortia Systems Coordinator
5000 TAMU
Evans Library
Texas A&M University
College Station, TX   77843-5000
[EMAIL PROTECTED]

Reply via email to