Subject: | |
From: | |
Reply To: | |
Date: | Mon, 24 May 2010 15:37:27 -0500 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
>This would add a period prior to the cutter in subfield i for a line like this:
>=852 0\$bMAIN$hHF54295D2$iM37$tCopy 1
>But not like this:
>=852 0\$bMAIN$hHF5429.5.D2$iM37$tCopy 1
>Better?
I can't speak to the MarcEdit aspects of the question, but I believe the question is similar to the error/warning message generated by "sub check_050" in MARC::Lintadditions [1]:
#warn if two alphanumeric Cutters are preceded by periods
if ($callno =~ /\.[A-Z]\d+.*?\.[A-Z]\d*/) {
#exceptions to two-period Cutters in field
###### In Process ######
#exception only if LCC is in G schedule
unless (($subfielda =~ /^G\d/)&&($subfielda =~ /\.[A-Z]\d+\s*\d{4}/)) {
########################
$self->warn( "050: Two Cutters preceded by period.")
} #unless this is an exception
} #if $callno has double-period Cutters
if (($callno =~ /[A-Z]\s+/) || ($subfielda =~ /[A-Z]$/)) {
$self->warn( "050: Cutter may be unfinished.")
} #if Cutter letter is followed by blank or nothing
unless ($subfieldb =~ /^\.[A-Z]/) {
unless ($callno =~ /\.[A-Z]/) {
#if a capital letter for Cutter appears in the field report error for missing period
$self->warn( "050: Cutter not preceded by period.") if ($callno =~ /^[A-Z]+.+?[A-Z]/);
} #unless another Cutter is preceded by period
} #unless subfieldb Cutter is preceded by period
###########################
While the above is written for 050, and doesn't take care of the replacement, it might be able to be adapted to resolve the question.
Examples:
No period needed: $hF27.M9$iK349 2005
Period needed: $hF788$i.K345
Period needed: $hRA781.15$i.F38 2007
###########
[1] <http://home.comcast.net/~eijabb/bryanmodules/MARC-Lintadditions-1.13/Lintadditions.pm.txt>
I hope this helps,
Bryan Baldus
Cataloger
Quality Books Inc.
The Best of America's Independent Presses
1-800-323-4241x402
[log in to unmask]
________________________________________________________________________
This message comes to you via MARCEDIT-L, a Listserv(R) list for technical and instructional support in MarcEdit. If you wish to communicate directly with the list owners, write to [log in to unmask] To unsubscribe, send a message "SIGNOFF MARCEDIT-L" to [log in to unmask]
|
|
|