foreach (@marcfields) {
my $field = $_->{field};
# Remove any blank char that might have unintentionally insered into the tag name
$field =~ s/\s+//g;
# If we have a user-supplied header, we use it
if (exists $_->{header}) {
-