for my $field ( $record->field('024') ) {
my $sf_2 = $field->subfield('2');
my $sf_a = $field->subfield('a');
my $sf_6 = $field->subfield('6');
next unless $sf_2 && $sf_a;
push @identifiers, {source => $sf_2, number => $sf_a, linkage => $sf_6};
push @identifiers, {source => $sf_2, number => $sf_a, };
}
return \@identifiers;
{
source => 'orcid',
number => '0000-0002-1234-5678',
linkage => 'https://orcid.org/0000-0002-1234-5678'
},
source => 'scopus',
number => '01234567890',
linkage => 'https://www.scopus.com/authid/detail.uri?authorId=01234567890'
]
);
-