TableParser: Daten aus Tabellen auslesen - #77068 (Allgemeines zu Perl)

vayu

2007-05-31 19:21

User since
2005-01-13
782 Artikel
BenutzerIn
[default_avatar]

erstmal ...

Code: (dl )

my $te = "table extract";
my $ts = "table search";

my $bid = "bugtraq id"

das bringt gar nix da vorher irgendwas reinzuschreiben :) das macht man normalerweise mit kommentaren:

Code: (dl )

my $te; #table extract
my $ts;  #table search

my $bid; #bugtraq id

dann

Code: (dl )

1
2
3

for (my $bid = 1; $bid <= 30000; $bid++) {
print "<table border=1 cellspacing=0>";
}

hier printest du genau 30.000mal hintereinander diesen text "<table border=1 cellspacing=0>" in die konsole.

und ganz unten gehst du ganz einfach nur diese seite durch:
"http://www.securityfocus.com/bid"

du möchtest ja aber wohl die seiten
"http://www.securityfocus.com/bid/1"
bis
"http://www.securityfocus.com/bid/30000"

durchgehen.

evtl solltest du dich erstmal durch das perltutorial durchlesen ...

in unserem Wiki findest du so ziemlich alles wichtige für ensteiger auf deutsch :)

perlintro

achso ... und

Quote
irgendwas geht noch nicht so wie ich das möchte

ist immer ganz schlecht. weil du weisst vielleicht was passiert und was schiefläuft, aber _wir_ wissen das nicht.

prinzipiell solltest du sowas in der art machen:

Code: (dl )

for(1 .. 30000) {
   my $table = $html_file."/".$_;
   $te = HTML::TableExtract->new( depth => 1, count => 0 );
   $te->parse_file($table);
}

aber wie du jetzt genau die tabellen auslesen musst, da musst dich mal selbst durchknobeln, hab jetzt vorlesung und muss noch ein wenig aufpassen :)\n\n

"imitation is the sincerest form of flattery."
- Lee Anthony Iacocca
http://img156.imageshack.us/img156/2056/perluserba...
http://img410.imageshack.us/img410/2664/tcmduserba...