使用 Perl 開啟一個“檔案下載”對話方塊

有時希望您可以提供一個選項，當用戶點選連結時，會向用戶彈出“檔案下載”對話方塊，而不是顯示實際內容。這是非常容易的，可以透過 Perl 指令碼使用 HTTP 標頭實現。

此 HTTP 標頭將不同於上一部分中提到的標頭。例如，如果您要使FileName 檔案可以從給定連結下載，則其語法如下 −

#!/usr/bin/perl
# HTTP Header
print "Content-Type:application/octet-stream; name = \"FileName\"\r\n";
print "Content-Disposition: attachment; filename = \"FileName\"\r\n\n";

# Actual File Content will go hear.
open( FILE, "<FileName" );
while(read(FILE, $buffer, 100) ) {
   print("$buffer");
}

Mohd Mohtashim

更新於：2019 年 12 月 2 日

236 次觀看

開啟你的職業生涯

透過完成課程獲得認證

開始