Opened by EdisonR1 at 2013-08-05 15:27
User since
2013-08-05
4 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2013-08-05
4 Artikel
BenutzerIn
Hallo zusammen,
ich versuche seit längerem das folgende Problem zu lösen:
Ich möchte einfach nur über ein perl Script auf ein span Element einer Seite zugreifen. Allerdings sind sämtliche Versuche, ob nun LWP::Simple oder WWW::Mechanize gescheitert.
Ich bekomme den Seiteninhalt immer nur als HTML-Seite roh ausgegeben d.h das Element, das ich ansprechen möchte ist dort gar nicht mehr vorhanden, wenn ich den Seiteninhalt mit print $browser->content() ausgebe.
Wenn ich hingegen mit dem Browser die html manuell mit chrome vollständig abspeichere, dann finde ich auch den Inhalt, den ich auf der Seite (siehe Code) suche. Unter dem Reiter "Horoskop" dann des Sternzeichen "Steinbock" <span>Steinbock</span> möchte ich durch den perl Script gezielt ansprechen.
Es müsste theoretisch möglich sein das WWW::Mechanize Objekt hier $browser einen bestimmten Pfad anzusprechen wenn sich das Objekt wie ein Browser verhält?
Könnt ihr mir helfen ich weiß nicht mehr weiter..
ich versuche seit längerem das folgende Problem zu lösen:
Ich möchte einfach nur über ein perl Script auf ein span Element einer Seite zugreifen. Allerdings sind sämtliche Versuche, ob nun LWP::Simple oder WWW::Mechanize gescheitert.
Ich bekomme den Seiteninhalt immer nur als HTML-Seite roh ausgegeben d.h das Element, das ich ansprechen möchte ist dort gar nicht mehr vorhanden, wenn ich den Seiteninhalt mit print $browser->content() ausgebe.
Wenn ich hingegen mit dem Browser die html manuell mit chrome vollständig abspeichere, dann finde ich auch den Inhalt, den ich auf der Seite (siehe Code) suche. Unter dem Reiter "Horoskop" dann des Sternzeichen "Steinbock" <span>Steinbock</span> möchte ich durch den perl Script gezielt ansprechen.
Es müsste theoretisch möglich sein das WWW::Mechanize Objekt hier $browser einen bestimmten Pfad anzusprechen wenn sich das Objekt wie ein Browser verhält?
Könnt ihr mir helfen ich weiß nicht mehr weiter..
Code: (dl
)
1
2
3
4
5
6
7
8
9
#!/usr/bin/perl -w
use WWW::Mechanize;
my $browser = WWW::Mechanize->new();
$browser->get("http://www.web.de/");
die $browser->responce->status_line unless $browser->success;
print $browser->content();