|
Lines 241-246
sub plugin {
Link Here
|
| 241 |
$subfield_value_i = $marcrecord->field('500')->subfield("i"); |
241 |
$subfield_value_i = $marcrecord->field('500')->subfield("i"); |
| 242 |
} |
242 |
} |
| 243 |
|
243 |
|
|
|
244 |
my $subfield_value_l; |
| 245 |
$subfield_value_l = $marcrecord->field('200')->subfield("d") |
| 246 |
if ( $marcrecord->field('200') ); |
| 247 |
|
| 248 |
my $subfield_value_n; |
| 249 |
$subfield_value_n = $marcrecord->field('210')->subfield("c") |
| 250 |
if ( $marcrecord->field('210') ); |
| 251 |
|
| 252 |
my $subfield_value_o; |
| 253 |
$subfield_value_o = $marcrecord->field('200')->subfield("e") |
| 254 |
if ( $marcrecord->field('200') ); |
| 255 |
|
| 244 |
my $subfield_value_p; |
256 |
my $subfield_value_p; |
| 245 |
$subfield_value_p = $marcrecord->field('215')->subfield("a") |
257 |
$subfield_value_p = $marcrecord->field('215')->subfield("a") |
| 246 |
if ( $marcrecord->field('215') ); |
258 |
if ( $marcrecord->field('215') ); |
|
Lines 278-283
sub plugin {
Link Here
|
| 278 |
{ |
290 |
{ |
| 279 |
$subfield_value_v = $marcrecord->field('200')->subfield("h"); |
291 |
$subfield_value_v = $marcrecord->field('200')->subfield("h"); |
| 280 |
} |
292 |
} |
|
|
293 |
|
| 281 |
my $subfield_value_x; |
294 |
my $subfield_value_x; |
| 282 |
if ( |
295 |
if ( |
| 283 |
$marcrecord->field('011') |
296 |
$marcrecord->field('011') |
|
Lines 301-306
sub plugin {
Link Here
|
| 301 |
$subfield_value_e =~ s/'/\\'/g; |
314 |
$subfield_value_e =~ s/'/\\'/g; |
| 302 |
$subfield_value_h =~ s/'/\\'/g; |
315 |
$subfield_value_h =~ s/'/\\'/g; |
| 303 |
$subfield_value_i =~ s/'/\\'/g; |
316 |
$subfield_value_i =~ s/'/\\'/g; |
|
|
317 |
$subfield_value_l =~ s/'/\\'/g; |
| 318 |
$subfield_value_n =~ s/'/\\'/g; |
| 319 |
$subfield_value_o =~ s/'/\\'/g; |
| 304 |
$subfield_value_p =~ s/'/\\'/g; |
320 |
$subfield_value_p =~ s/'/\\'/g; |
| 305 |
$subfield_value_t =~ s/'/\\'/g; |
321 |
$subfield_value_t =~ s/'/\\'/g; |
| 306 |
$subfield_value_u =~ s/'/\\'/g; |
322 |
$subfield_value_u =~ s/'/\\'/g; |
|
Lines 319-324
sub plugin {
Link Here
|
| 319 |
subfield_value_e => "$subfield_value_e", |
335 |
subfield_value_e => "$subfield_value_e", |
| 320 |
subfield_value_h => "$subfield_value_h", |
336 |
subfield_value_h => "$subfield_value_h", |
| 321 |
subfield_value_i => "$subfield_value_i", |
337 |
subfield_value_i => "$subfield_value_i", |
|
|
338 |
subfield_value_l => "$subfield_value_l", |
| 339 |
subfield_value_n => "$subfield_value_n", |
| 340 |
subfield_value_o => "$subfield_value_o", |
| 322 |
subfield_value_p => "$subfield_value_p", |
341 |
subfield_value_p => "$subfield_value_p", |
| 323 |
subfield_value_t => "$subfield_value_t", |
342 |
subfield_value_t => "$subfield_value_t", |
| 324 |
subfield_value_u => "$subfield_value_u", |
343 |
subfield_value_u => "$subfield_value_u", |