如何在cgi perl中将数据输出为文件

Question

我有下载文件的直接链接： http://www.mydomain.com/file.cfg

我需要使用cgi脚本获取文件 - http://www.mydomain.com/getFile.cgi

但是对于端点设备，即下载文件，两种方式都不应该有区别。所有标题和内容应完全相同。 我如何用perl实现它？

现在我执行以下操作：

        my $fname = "file.cfg";
        print "Content-Type:application/x-download\n";
        print "Content-Disposition: attachment; filename=$fname\n\n";
        open FILE, "< $fname" or die "can't open : $!";
        binmode FILE;
        while (<FILE>){
            print $_;
        }
        close FILE;

但我认为它与直接链接到文件不同。 任何人都可以帮我吗？