2

perl経由でhttpヘッダーを送信して、ファイルを強制的にダウンロードしようとしています。現在のコードは次のとおりです。

#!/usr/bin/perl
use strict;
use Session;
use CGI::Carp qw(fatalsToBrowser);

use HTTP::Headers;

HTTP::Headers->new(
                Content_type =>  'text/plain',
                Content_disposition => 'attachment; filename=export.txt',
            );
print 'just some text';
exit;

私も含めましHTTP::Headersたが、これを実行すると、コンテンツをダウンロードする代わりにテキストが出力されます...

4

4 に答える 4

1

わかりました、もっと簡単な方法を見つけました...

を使用する代わりにHTTP::Headers、次の行を単に印刷しました。

print"Content-type:text/plain\n";
print"Content-disposition:attachment; filename=export.txt\n\n";

トリックをしたのは...

于 2013-08-05T11:13:36.543 に答える