Re: [Debian] Perl: Warum funzt das nicht?
On Wed, Dec 13, 2000 at 08:15:09PM +0100, Ulrich Wiederhold wrote:
> Hallo,
> ich verwende folgende Zeile in einem Perlscript:
>
> if ($varone =~ /\Q^.$two/)
>
> Soll heißen, wenn $varone unabhängig von Sonderzeichen und Groß- und
> Kleinschreibung am Anfang irgendein Zeichen und $two enthält, führe if
> aus.
$varone =~ /^.\Q$two/i
Sollte auf alles passen, was nach dem Zeilenanfang ein beliebiges
Zeichen enthält und anschließend den Inhalt von $two, unabhängig von
Groß/Kleinschreibung.
Wenn nicht der Inhalt von $two sondern literal '$two' dort stehen soll,
müßte noch ein \ vor das $.
Best regards from Dresden/Germany
Viele Gruesse aus Dresden
Heiko Schlittermann
--
SCHLITTERMANN --------------------- internet & unix support -
<a href="http://debian.schlittermann.de/"> Debian 2.x CD </a>
Heiko Schlittermann HS12-RIPE finger:heiko@schlittermann.de -
pgp: A1 7D F6 7B 69 73 48 35 E1 DE 21 A7 A8 9A 77 92 -------
gpg: CC19 0FE2 073B AEA1 5C11 37DD 347D 73DC FF56 BA6D -----
--
-----------------------------------------------------------
Um sich aus der Liste auszutragen schicken Sie bitte eine
E-Mail an debian-user-de-request@lehmanns.de die im Subject
"unsubscribe <deine_email_adresse>" enthaelt.
Bei Problemen bitte eine Mail an: Jan.Otto@Lehmanns.de
-----------------------------------------------------------
703 eingetragene Mitglieder in dieser Liste.
Reply to: