Alternative HTTP::Async (gelöst) (Fragen zu Perl-Modulen)

[thread]19950[/thread]

Alternative HTTP::Async [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 10

Articles: hide open all | hide show old branches

Teilbaum:
Alternative HTTP::Async (8 Artikel) 2016-01-14 09:58

+9 replies
GwenDragon

2016-01-12 13:53

User since
2005-01-17
14848 Artikel
Admin1

Wie wär's mit HTTP::Async?
Last edited: 2016-01-14 09:58:07 +0100 (CET)
die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- +8 replies
- bianca
  
  2016-01-12 16:04
  
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  
  Sieht der gut aus auf den ersten Blick. Hab auch schon einen Test laufen.
  Aber was mir direkt fehlt sind credentials. Wie pflanze ich einem solchen HTTP::Request credentials ein? Finde in beiden Dokus keinen Hinweis dazu.
  Weiß das jemand?
  10 print "Hallo"
  20 goto 10
  - +5 replies
  - Linuxer
    
    2016-01-12 16:47
    
    User since
    2006-01-27
    3891 Artikel
    HausmeisterIn
    
    HTTP::Request benutzt HTTP::Headers, das beispielsweise eine Methode authorization_basic() kennt, um User/Passwort zu definieren.
    
    perldoc HTTP::Request
    $r = HTTP::Request->new( $method, $uri, $header, $content )
    
    Constructs a new HTTP::Request object describing a request on the object $uri using method $method. The $method argument must be a string. The $uri argument can be either a string, or a reference to a URI object. The optional $header argument should be a reference to an HTTP::Headers object or a plain array reference of key/value pairs. The optional $content argument should be a string of bytes.
    
    Die Frage bleibt aber offen, ob Dir Basic Authentication reicht, oder ob Du da noch was anderes brauchst/suchst... Schau Dir also mal HTTP::Headers an.
    Last edited: 2016-01-12 17:55:56 +0100 (CET)
    meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
    Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
    - +2 replies
    - bianca
      
      2016-01-12 17:16
      
      User since
      2009-09-13
      7016 Artikel
      BenutzerIn
      
      Der pod Link zu HTTP::Headers ist kaputt. Wollte nur Bescheid sagen, gefunden hab ich es natürlich auch so.
      
      Schaue ich mir gleich mal an.
      10 print "Hallo"
      20 goto 10
      - Linuxer
        
        2016-01-12 17:56
        
        User since
        2006-01-27
        3891 Artikel
        HausmeisterIn
        
        Danke. Ist korrigiert, sollte eigentlich ein mod-Tag werden, kein pod.
        meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
        Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
    - +2 replies
    - bianca
      
      2016-01-12 18:04
      
      User since
      2009-09-13
      7016 Artikel
      BenutzerIn
      
      Bekomme leider ein "401 Authorization Required" vom Server.
      Schaut mal bitte, ob meine Syntax korrekt ist, denn Passwort ist korrekt und AuthType Basic ist ebenfalls korrekt. Es kann also nur an meiner Syntax liegen.
      
      Code (perl): (dl )
      
      1 2 3 4 5 6 7 8 9 10 11 12
      
      my $h = HTTP::Headers->new; $h->authorization_basic('user','passwort_im_klartext'); my $request = HTTP::Request->new( 'GET', 'http://www. ... .de/script', $h, ); my $id1 = $async->add($request); my $id2 = $async->add( HTTP::Request->new(GET => 'http://www. ... .de')); while ( my ( $response, $id ) = $async->wait_for_next_response ) { say $id.' liefert '.length($response->decoded_content)." Byte: '".$response->decoded_content."'"; }
      
      10 print "Hallo"
      20 goto 10
      - kristian
        
        2016-01-12 19:23
        
        User since
        2005-04-14
        684 Artikel
        BenutzerIn
        
        Früher hat man das so gelöst:
        
        Code: (dl )
        
        http://user:passwort@www.domain.tld/path/page.htm
        
        LWP kennt das auf Nixen immer noch, die Apache auch.
  - +2 replies
  - bianca
    
    2016-01-13 13:04
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    Die Lösung hier lag darin, dass ich die Credentials dem falschen Request mitgegeben hatte. Das heißt, der Code aus msg #183497 läuft, wenn man die Credentials dem richtigen Request mitgibt *in Tisch beiss*
    Bin in dieser Parallel-Welt noch nicht so geübt.
    
    Auch hier ein DANKE an die Helfer(innen)!
    10 print "Hallo"
    20 goto 10
    - GwenDragon
      
      2016-01-13 13:20
      
      User since
      2005-01-17
      14848 Artikel
      Admin1
      
      Na, wenn du selbst drauf kommst, haste doch was gelernt und kannst Fehler finden :)
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2016-01-11 10:49.