RegEg Suchmaschinen Referrrer: Will den Suchbegriff rausfiltern (Perl/CGI)

[thread]79[/thread]

RegEg Suchmaschinen Referrrer: Will den Suchbegriff rausfiltern

root

2003-10-25 21:57

User since
2003-08-15
120 Artikel
BenutzerIn
[default_avatar]

Ich hasse diese RegEgs!
Ich will nicht das letzte "&" ich will das erste "&"!!!

Seuftz - hiiiilfe
aus

Code: (dl )

1
2
3

http://www.google.com/ie?q=www.diamant-solitaire.de&hl=de&ie=ISO-8859-1&btnI=Auf+gut+Gl%FCck%21
oder
http://www.google.ch/search?q=Diamanten+Bildergalerie&hl=de&lr=&ie=UTF-8&start=20&sa=N

soll
nur www.diamant-solitaire.de
oder
nur Diamanten+Bildergalerie
werden!

Code: (dl )

my $suchbegriffe = $referrer =~ m/q=(.+)&/i;

Er gibt aber
www.diamant-solitaire.de&hl=de&ie=ISO-8859-1
oder
Diamanten+Bildergalerie&hl=de&lr=&ie=UTF-8&start=20

Könnte mir jemand bei dem RegEg helfen?! Danke!

Weiß jemand wie andere Suchmaschinen als Referrer rein kommen, so dass ich diese auch durchsuchen und auswerten kann?

Grüße root

[E|B]

2003-10-25 23:16

User since
2003-08-08
2561 Artikel
HausmeisterIn

Hi!
Versuch es mal so:

Code: (dl )

1
2

$string = "http://www.google.com/ie?q=www.diamant-solitaire.de&hl=de&ie=ISO-8859-1&btnI=Auf+gut+Gl%FCck%21";
$string =~ s!http://www\.google\..*?/.*?\?q=(.*?)&hl=.+!$1!;

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

View all threads created 2003-10-25 21:57.