maybe this will work? (unsure what's gonna be coming back)

diff --git a/fingerprinter b/fingerprinter
index 2f27fba..65e98dc 100755 (executable)
--- a/fingerprinter
+++ b/fingerprinter
@@ -105,7 +105,7 @@ sub populate_marc {
 
     # "Accompanying material" (300e)
     $marc{accomp} = $record->field('300')->subfield('e')
-      if (defined $record->field('300')->subfield('e'));
+      if $record->field('300');
 
     # issn, lccn, title, desc, pages, pub, pubyear, edition
     $marc{lccn} = $record->field('010')->subfield('a') if $record->field('010');