Marcus Vieß: Filterproblem bei Perl

Beitrag lesen

Das script soll bei bestimmten Wörtern die es findet bestimmte sachen machen. Mhh bis zu einem Teil funktioniert das ganze.
z.B. scheinen die ersten 3 Filterwörter tatsächlich zu klappern, nur das Ebay Wort scheint nicht zu laufen.

Liegt das daran das das Wort ebay in der $env eingebunden ist ?
also z.B. http://www.ebay.de/cgi-bin/blablabla.html während die anderen immer an ende hängen oder hab ich da grundsätzlich was falsch ?

Er sollte das Wort als Filter quasi mit Wildcard vorne und hinten nehmen, also quasi *.*ebay*.* oder *ebay*.

Kann mir einer helfen was fehlt oder falsch gemacht wird ?

Scriptauszug :

my(@filter) = ('robots.txt','favicon.ico','undefined','ebay');
my($filter) = join('|',@filter);

if(!($ENV{'REFERER_URL'} =~ /($filter)/) && !($ENV{'HTTP_REFERER'} =~ /($filter)/)) {

aktion1

} else { exit;}

gruß,
        Marcus