strstr() gibt es nach meiner Kenntnis in Perl nicht.
Würde ich mit einem Regex lösen.
if ($ENV{'QUERY_STRING'} =~ /$_/ || ...) {matcht}
Aber vorsichtig mit dem $_. Was genau soll das sein?

Edit: Soeben gelernt, dass es index() gibt. Habe ich aber noch nie gebraucht.

Editiert von bianca: Korrektur wegen index()
Last edited: 2013-09-16 13:54:28 +0200 (CEST)