Opened by Rocco at 2007-03-07 16:02
User since
2005-11-18
37 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-11-18
37 Artikel
BenutzerIn
[quote=renee,07.03.2007, 15:26]? ist ein Sonderzeichen bei Regulären Ausdrücken. Deswegen musst Du es escapen:
[/quote]
hallo renee, danke für deine hilfe,
nachdem ich die zeile ausgebessert hatte und die 2 zeilen darunter wo es genauso war,
sind die fehlermeldungen weg und es wird mehr gefunden wie vorher.
leider noch nicht alles, es gibt seiten die noch immer von der suche nicht erfasst werden,
ich nehme an es hat was mit den seiten namen zu tun.
momentan werden nur htm dateien gefunden, aber keine *.html dateien kann das sein?
was mir auch noch aufegfallen ist sind die parts die divs betreffen hier drinnen
kann das auch noch auswirkungen aufs suchergebnis haben, oder spielt das keine rolle mehr?
Code: (dl
)
$term=~ s/\?/?\;/g;
hallo renee, danke für deine hilfe,
nachdem ich die zeile ausgebessert hatte und die 2 zeilen darunter wo es genauso war,
sind die fehlermeldungen weg und es wird mehr gefunden wie vorher.
leider noch nicht alles, es gibt seiten die noch immer von der suche nicht erfasst werden,
ich nehme an es hat was mit den seiten namen zu tun.
Code: (dl
)
1
2
3
sub find_files{
push(@files,$File::Find::name) if(-f $File::Find::name && $_ =~ /\.htm$/);
}momentan werden nur htm dateien gefunden, aber keine *.html dateien kann das sein?
was mir auch noch aufegfallen ist sind die parts die divs betreffen hier drinnen
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
28
29
30
31
32
sub start{
my ($self,$tag,$attr) = @_;
if($tag eq 'div' && $attr->{class} eq 'scroll'){
$self->{search} = 1;
}
if($tag eq 'div' and $self->{search}){ # DIESEN PART LÖSCHEN ?
$self->{divs}++;
}
if($tag eq 'title'){
$self->{title} = 1;
}
}
sub text{
my ($self,$dtext) = @_;
$string .= $dtext if($self->{search});
$title = $dtext if($self->{title});
}
sub end{
my ($self,$tag) = @_;
if($tag eq 'div' and $self->{search}){
$self->{divs}--;
}
if($self->{divs} == 0){ # DIESEN PART LÖSCHEN ?
$self->{search} = 0;
}
if($tag eq 'title'){
$self->{title} = 0;
}
} kann das auch noch auswirkungen aufs suchergebnis haben, oder spielt das keine rolle mehr?