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>";

内容处理有问题。我无法让它发挥作用。