137 |
$record->append_fields( MARC::Field->new('100','','','a' => 'Author 2'), MARC::Field->new('880','','','a' => 'Something') ); |
137 |
$record->append_fields( MARC::Field->new('100','','','a' => 'Author 2'), MARC::Field->new('880','','','a' => 'Something') ); |
138 |
my $biblionumber = C4::Biblio::AddBiblio($record, ''); |
138 |
my ( $biblionumber ) = C4::Biblio::AddBiblio($record, ''); |