2 Einträge, 1 Seite |
1
2
3
4
5
6
7
8
9
10
while (my $token = $p->get_token()) {
if( $f == 1 and $token->[0] eq "S" and $token->[1] eq 'td' ) {
my $t = $p->get_text();
next if $t eq ''; # das img-Element wurde mittels
# default-einstellung in ein '' verwandelt
# vgl. Doku
print "$t\n";
$f = 3; # flag zum aufhören
}
} # /while;
2 Einträge, 1 Seite |