- print $query->header(
- -type => 'application/octet-stream',
- -attachment=>"bib-$biblionumber.$format");
+ if ($format eq 'marc8'){
+ print $query->header(
+ -type => 'application/marc',
+ -charset=>'ISO-2022',
+ -attachment=>"bib-$biblionumber.$format");
+ }
+ elsif ( $format eq 'isbd' ) {
+ print $query->header(
+ -type => 'text/plain',
+ -charset => 'utf-8',
+ -attachment => "bib-$biblionumber.txt"
+ );
+ }else{
+ print $query->header(
+ -type => 'application/octet-stream',
+ -charset=>'utf-8',
+ -attachment=>"bib-$biblionumber.$format");
+ }