[WWW::Mechanize] Content in Array (solved) (Fragen zu Perl-Modulen)

[thread]16783[/thread]

[WWW::Mechanize] Content in Array [solved]

Tags: perl5 Mechanize Similar Threads

Readers: 10

Articles: hide open all | hide show old branches

+5 replies
Kean

2011-10-07 11:57
User since
2004-08-18
464 articles
BenutzerIn
Ich lade eine Seite mit der Get Methode von WWW::Mechanize.
Danach würde ich gerne jede einzelne Zeile dieser Seite auswerten. Wie kann ich das machen?

Gibt es evtl. eine Möglichkeit die Seite in ein Array zu schreiben? Wenn ich es einfach zuweise, hat das Array nur ein Element mit dem kompletten Inhalt.

Hier der Code wie ich die Seite lade:
Code (perl): (dl )

1 2 3 4

use strict; use WWW::Mechanize; my $mech = WWW::Mechanize->new( autocheck => 1, onerror => undef ); $mech->get("www.test.de");
- +4 replies
- GwenDragon
  
  2011-10-07 12:31
  User since
  2005-01-17
  14892 articles
  Admin1
  Die empfangenen Daten sind in $mech->content.
  
  Also:
  
  Code (perl): (dl )
  
  my $content = $mech->content;
  
  In ein Array? Wie denn das?
  Es gibt keine Zeilenenden in bei HTML. Deswegen gibt es auch keine Zeilen.
  
  Bei HTTP sind nur die HTTP-Header mit Zeilenenden versehen, der Content nicht, der ist ein Stream von Bytes.
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +3 replies
  - Kean
    
    2011-10-07 13:01
    
    User since
    2004-08-18
    464 articles
    BenutzerIn
    
    Ja genau das ist das Problem. Ich benötige aber Zeilenenden.
    Wenn ich den Content in eine Textdatei schreibe und aus dieser wieder in ein Array einlese, dann hab ich welche. Das ganze ist aber ziemlich umständlich...
    
    Da müsste es doch einen einfacheren Weg geben oder?
    - pq
      
      2011-10-07 13:08
      
      User since
      2003-08-04
      12209 articles
      Admin1
      
      my @lines = split /\n/, $content;
      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
    - GwenDragon
      
      2011-10-07 14:09
      
      User since
      2005-01-17
      14892 articles
      Admin1
      
      Zeilenenden könnten in der Realität folgende Zeichenkombinationen sein:
      Line Feed, U+000A
      Vertical Tab, U+000B
      Form Feed, U+000C
      Carriage Return, U+000D
      CR (U+000D) followed by LF (U+000A)
      Next Line, U+0085
      Line Separator, U+2028
      Paragraph Separator, U+2029
      
      Weiteres
      http://www.w3.org/TR/REC-xml/#sec-line-ends
      http://en.wikipedia.org/wiki/Newline#Representatio...
      http://en.wikipedia.org/wiki/Newline#Unicode
      
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2011-10-07 11:57.