printend
;
}
else {
if ($dat->{'subtitle'} ne ''){
print "Subtitle: $dat->{'subtitle'}
";
}
if ($dat->{'author'} ne ''){
print "Author: $dat->{'author'}
";
}
#Additional Author:
if ($dat->{'seriestitle'} ne ''){
print "Seriestitle: $dat->{'seriestitle'}
";
}
if ($dat->{'subject'} ne ''){
print "Subject: $dat->{'subject'}
";
}
if ($dat->{'copyrightdate'} ne ''){
print "Copyright:$dat->{'copyrightdate'}
";
}
if ($dat->{'notes'} ne ''){
print "Notes: $dat->{'notes'}
";
}
if ($dat->{'unititle'} ne ''){
print "Unititle: $dat->{'unititle'}
";
}
#Analytical Author:
#Analytical Title:
if ($dat->{'serial'} ne '0'){
print "Serial: Yes
";
}
print "Total Number of Items: $count
";
}
if ($type ne 'opac'){
print "";
}
print <