PERL - 下載CSV文件不完全

Question

我有接受形式的輸入，並登錄到Testopia一個服務器端腳本（Bugzilla的插件）並得到一個CSV描述使用特定測試運行：

Mech->get("<...>/tr_list_caseruns.cgi?ctype=csv&run_id=xxxxx", ":content-file" => "result.csv");

瀏覽器鏈接是一些JavaScript，通過將window.location設置爲此URL來導出CSV。手動點擊瀏覽器中的鏈接將下載完整的CSV，但使用機械化獲取鏈接將只下載前25條記錄（在瀏覽器提示下載中輸入網址，也只能獲得前25條記錄）。鏈接的格式爲：

text: 'Export Results to CSV', 
icon: 'extensions/Testopia/img/csv.png', 
iconCls: 'img_button_16x', 
handler: function(){ 
window.location = 'tr_list_caseruns.cgi?ctype=csv&run_id=' + run.run_id; 

（在Ext.menu.Menu）

有沒有做到這一點的好辦法？即使輸入網址和點擊鏈接之間的區別也是有用的。謝謝。

-Kevin

Answer 1

使用「實時HTTP頭」或「螢火蟲」或一些這樣的插件來獲取工作是沒有的請求和一個。然後，開始添加工作的標題，直到找到服務器需要的標題。