|
Lines 128-135
else {
Link Here
|
| 128 |
-attachment => "bib-$biblionumber.txt" |
128 |
-attachment => "bib-$biblionumber.txt" |
| 129 |
); |
129 |
); |
| 130 |
} else { |
130 |
} else { |
| 131 |
binmode STDOUT, ':encoding(UTF-8)'; |
|
|
| 132 |
print $query->header( |
131 |
print $query->header( |
|
|
132 |
-'Content-Transfer-Encoding' => 'binary', |
| 133 |
-type => 'application/octet-stream', |
133 |
-type => 'application/octet-stream', |
| 134 |
-charset => 'utf-8', |
134 |
-charset => 'utf-8', |
| 135 |
-attachment => "bib-$biblionumber.$format" |
135 |
-attachment => "bib-$biblionumber.$format" |
| 136 |
- |
|
|