Month: November 2008

Updated: I missed a ‘?’ in the original code that pushed a single cutter into the second-cutter position. Fixed below. Crap. Update 2: Initial letters can be three characters long. Regexp and output changed. LoC Call numbers tend to be a mess, and I’ve been working this morning trying to normalize them for easy string comparison. The perl function below takes a call number (with some level of sloppiness) and returns a string suitable for comparisons with other strings returned by the function. It outputs stuff like this: E E 0000.0000 0000 0000 E 184 .A1 G78 E 0184.0000A 1000G…