Dir ohne Unterordner in .txt Datei u.ä.. Wie? - #101746 (Allgemeines zu Perl)

#Kein Kommentar

2007-11-03 15:40

User since
2007-06-09
575 Artikel
HausmeisterIn
[default_avatar]

Code (perl): (dl )

my $irgend_eine_dateizeile = "Freund Mayer wohnt in blablabla und blablabla hat die telefonnummer blablabla";

my $suchmuster = "Mayer";

if ($irgend_eine_dateizeile =~ m/$suchmuster/i){
        #ein zähler wird erhöht:
        $Zahl++;
}

der ausdruck

Code: (dl )

$irgend_eine_dateizeile =~ m/$suchmuster/i

sucht in der variable $irgend_eine_dateizeile nach $suchmuster.

das "i" am schluss bedeutet, dass es egal ist ob die Großschreibung übereinstimmt.

wenn der ausdruck in der variable gefunden wurde, wird 1 (TRUE) zurückgegeben, dadurch stimmt die "if"-bedingung und der anweisungsblock in den geschweiften klammern wird ausgeführt.

Gerade weil wir alle in einem Boot sitzen, sollten wir froh sein, dass nicht alle auf unserer Seite sind