Help for this page

Select Code to Download


  1. or download this
    $agent->get($url);
    $agent->form_number(1);
    ...
    $agent->content =~ m/\'\/goto\/(.*)\'/;
    print "Der Link: $1\n\n";
    $agent->get( $1);
    
  2. or download this
    Der Link: http://www.library.ethz.ch:80/search/action/login.do?afterPD
    +S=true&vid=DADS&vid=DADS&dscnt=1&targetURL=http%3A%2F%2Fwww.library.e
    +thz.ch%2Fsearch%2Faction%2Fsearch.do%3Fdscnt%3D0&frbg=&tab=default%5F
    +tab&dstmp=1356212616435&srt=rank&ct=search&mode=Basic&dum=true&indx=1
    +&vl%28freeText0%29=Ajax&cmslang=ger-DE&fn=go&pds_handle=GUEST
    
    Error GETing http://www.library.ethz.ch/search/action/http%3A%2F%2Fwww
    +.library.ethz.ch%2Fsearch%2Faction%2Fsearch.do%3Fdscnt%3D0dscnt=2&frb
    +g=&tab=default%255Ftab&dstmp=1356212617376&srt=rank&ct=search&mode=Ba
    +sic&dum=true&indx=1&vl%28freeText0%29=Ajax&fn=go&vid=DADS&cmslang=ger
    +-DE&fromLogin=true&fromLogin=true: Not Found at mech_auto.pl line 24
    
  3. or download this
    http://www.library.ethz.ch/search/action/search.do?&dscnt=1&frbg=&tab=
    +default_tab&dstmp=1356213423770&srt=rank&ct=search&mode=Basic&dum=tru
    +e&indx=1&fromLogin=true&vl(freeText0)=Ajax&vid=DADS&fn=search&cmslang
    +=ger-DE