perl - ダウンロード ダイアログ ボックスを表示する CGI.pm ヘッダー関数

Question

cgi perl スクリプトからダウンロード ダイアログ ボックスを表示する必要があります。

これは私が持っているものです

use CGI qw/:standard/;

print header(-type=>'text/xml',-charset=>'UTF-8');
print header(-'Content-Disposition'=>'attachment; filename="FileName"');
print "<root></root>";

content-Disposition に問題があります。私はそれを働かせることができませんでした。