Webseite ausfüllen (Webframeworks, Sonstige Fragen zur Webprogrammierung mit Perl)

[thread]14172[/thread]

Webseite ausfüllen

Leser: 26

Articles: hide open all | hide show old branches

+10 replies
LE

2009-10-23 12:01

User since
2009-10-23
80 Artikel
BenutzerIn

Hallo liebe community,

ich musste mir in den letzten zwei Tagen PERL bei bringen. Bin also noch ein ganz schöner Noob.
Das Problem ist das ich jetzt aber die Aufgabe bekommen habe ein Script zuschreiben. Dieses Script soll auf einer Webseite Felder ausfüllen (wie man sie z.B. von einer Passwort und Benutzername Abfrage kennt). Da ich mit PERL erst seit zwei Tagen arbeite, habe ich keine Ahnung wie ich anfangen soll bzw wie es funktionieren soll.
Ich habe jedoch schon auf diversen Seiten was über LWP::Simple und HTML::Parsen gelesen. Habe aber nicht so richtig verstanden wie das funktionieren soll!

Für schnelle Hilfe wäre ich dankbar.

Gruß LE
- +9 replies
- pq
  
  2009-10-23 12:04
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  hi,
  
  versuchs mal mit WWW::Mechanize bzw. zum rumprobieren WWW::Mechanize::Shell. das nimmt dir das fetchen und parsen ab.
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +8 replies
  - LE
    
    2009-10-23 12:05
    
    User since
    2009-10-23
    80 Artikel
    BenutzerIn
    
    Danke für den Tip...aber wie funktioniert das?
    - GwenDragon
      
      2009-10-23 12:30
      
      User since
      2005-01-17
      14558 Artikel
      Admin1
      
      Schau dir mal bitte Thomas Fahles Vortrag an.
      http://www.thomas-fahle.de/talks/WWW-Mechanize.pdf
      die Drachin, Gwendolyn
      
      Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
    - +6 replies
    - pktm
      
      2009-10-23 14:54
      
      User since
      2003-08-07
      2921 Artikel
      BenutzerIn
      
      Das, was du suchst, steht in der Manpage, die dir pq verlinkt hat, direkt unter SYNOPSIS. Im Zweifelsfall einfach mal ausprobieren. Wenn du dann Probleme mit konkretem Code hast, kannst du das hier gerne posten.
      
      Hier ein ungetestetes Stück Code als Vorlage
      
      Code: (dl )
      
      1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
      
      #!/usr/bin/perl use strict; use warnings; use WWW::Mechanize; # mechanize-Objekt erstellen, Damit arbeiten wir. my $mech = WWW::Mechanize->new(); # Adresse der Webseite mit dem Formular, das du ausfüllen willst. my $url = 'http://www.secured-site.com'; # Webseite mittels GET-Request (einfach mal danach googeln) auslesen $mech->get( $url ); # das Login-Formular auswählen (über die ID) my $name = "is_des_formulars"; $mech->form_id( $name ); # Formular mit deinen zugangsdaten abschicken $mech->submit_form( form_number => 3, fields => { username => 'mungo', password => 'lost-and-alone', } );
      
      Steht so alles in dem Link von PQ, man muss nur ein bisschen lesen und suchen ;-)
      http://www.intergastro-service.de (mein erstes CMS :) )
      - +5 replies
      - LE
        
        2009-10-23 16:36
        
        User since
        2009-10-23
        80 Artikel
        BenutzerIn
        
        Ich bedanke mich für eure Hilfe!
        Das hat alles wunderbar geklappt!
        
        Jetzt steh ich aber vor was neuem:
        
        Wenn ich das formular jetzt abgeschickt habe, öffnet sich ein neues fenster. In diesem will ich setzt mit dem script weiter arbeiten. Wie kann ich das jetzt machen das dass Script in das fenster springt?
        
        Gruß LE
        
        +4 replies
        
        pktm
        
        2009-10-23 17:18
        
        User since
        2003-08-07
        2921 Artikel
        BenutzerIn
        
        Bei mir kommen keine Fenster. Zeig mal deinen Code (ohne deine Zugangsdaten bitte). Dann kann ich vllt. sehen, was du meinst.
        http://www.intergastro-service.de (mein erstes CMS :) )
        
        +3 replies
        
        bianca
        
        2009-10-23 17:21
        
        User since
        2009-09-13
        6978 Artikel
        BenutzerIn
        
        pktm, ich glaube er meint, wie er mit der neuen Seite nach Abschicken des Formulars weiter arbeiten kann. Vermutlich meint er "Fenster" im übertragenen Sinn.
        
        LE, es wäre auf jeden Fall gut, wenn Du genauer beschreiben würdest, was auf der Seite genau passiert. Dann reicht nämlich u.U. ein get ansonsten müsste evtl. ein follow_link gemacht werden.
        10 print "Hallo"
        20 goto 10
        
        +2 replies
        
        LE
        
        2009-10-26 08:27
        
        User since
        2009-10-23
        80 Artikel
        BenutzerIn
        
        Hallo zusammen....
        
        Es ist so wenn ich die Seite ohne Script aufrufe und dort alles per Hand eingebe und dann auf senden drücke, wird ein neues Fenster vom internetexplorer geöffnet (keine neue Registerkarte). In diesem neuen Fenster sind dann die gewünschten Links oder Information, halt wie ich es eingegeben hab.
        
        Hoffe das ist erklärung genug. Ansonsten melden.
        
        Gruß LE
        
        pq
        
        2009-10-26 12:23
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        WWW::Mechanize kennt keine "Fenster".
        Du musst schon sagen, wie die URL des neuen Fensters lautet und diese dann von Hand mit mechanize aufrufen.
        Wenn das Fenster per Javascript geöffnet wird, hast du evtl. noch ein bisschen mehr Arbeit. Im Idealfall gibt es aber eine Alternative ohne Javascript.
        Also, fülle das Formular aus und finde die URL des Popups heraus. Das können wir nicht für dich tun, wir kennen ja nicht mal die Seite, von der die Rede ist.
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem

View all threads created 2009-10-23 12:01.