어떻게 perl을 사용하여 클릭 방법을 사용하여 파일을 다운로드 할 수 있습니까?

Question

나는 기계화 모듈 클릭 방법, 를 사용하여 웹 사이트 http://www.ncdex.com/MarketDataAction_bhavCopy.action

에서 XLS 파일을 다운로드하려고하지만 같은 오류를 제공합니다

오류 http://www.ncdex.com/MarketDataAction_bhavCopySubmit.action을 게시 : click_method.pl 라인에서 찾을 수 없음 6.

내가 날짜 (13)이 웹 사이트에서 XLS 파일을 다운로드 할

use WWW::Mechanize; 
my $mech = WWW::Mechanize->new(); 
my $url = 'http://www.ncdex.com/MarketDataAction_bhavCopy.action'; 
$mech->get($url); 
$mech->submit_form(
       fields  => { 
         'dateSelected' => '13/03/2017', 
       } 
     ); 
$mech->click_button(
       name => "buttonType", 
       id => "buttonType", 
       value => "xls Format", 
       type => "submit" 
     ); 

print $mech->content(); 

:

여기 내 코드입니다/A .xls 파일에/2017 03 또는

Answer 1

가 직접 아래 URL을 명중 다른 날짜 및 쓰기 데이터

use WWW::Mechanize; 
my $mech = WWW::Mechanize->new(autocheck => 0); 
$mech->get("http://www.ncdex.com/MarketDataAction_bhavCopySubmit.action?bhavTitle=bhav&dateSelected=13%2F03%2F2017&buttonType=xls+Format"); 
my $data = $mech->content; 
print $data; 

당신은 그것을 실행하고 .xls 파일 예에 출력을 리디렉션하여 코드를 확인할 수 있습니다

: - 펄 테스트 .pl> output.xls