$t = "Test"; if($t =~ /e/) { print "wahr";} else { print "falsch";} |
$t="Der Maurer mauert Mauern"; if($t =~ /rer/) { print "wahr\n" } else { print "falsch\n" } # Test 1 if($t =~ /mauert Mauern/) { print "wahr\n" } else { print "falsch\n" } # Test 2 if($t =~ /der maurer/) { print "wahr\n" } else { print "falsch\n" } # Test 3 |
$t="Reguläre Ausdrücke können auch kompliziert sein..."; if( $t=~ /\.\.\./){ print "wahr\n" } else { print "falsch\n" } # Test 1 if($t=~ /\./) { print "wahr\n" } else { print "falsch\n" } # Test 2 if($t=~ /./) { print "wahr\n" } else { print "falsch\n" } # Test 3 |
$t="Der Punkt als Universalzeichen"; if($t =~ /P...t/) { print "wahr\n" } else { print "falsch\n" } # Test 1 |
$t="Noch eine Suchart"; $s="eine"; if ($t=~/$s/){print "wahr";} else {print "falsch";} |
$t="Noch eine Suchart"; $s="."; if ($t=~/$s/){print "wahr";} else {print "falsch";} |
#Beispiel 1 $t="Noch eine Suchart"; $s="\."; if ($t=~/$s/){print "wahr";} else {print "falsch";} |
$t="Noch eine Suchart"; $s="\."; if ($t=~ /($s)/){print "wahr, gefunden wurde $1";} else {print "falsch";} |
$t="Noch eine Suchart"; $s="\."; if ($t=~ /($s)/){print "wahr, gefunden wurde $1\n";} else {print "falsch\n";} #hier wird $s genauer untersucht print "Inhalt von \$s: $s \nLaenge von \$s: ".length($s)." Zeichen"; |
$t="Noch eine Suchart"; $s='\.'; if ($t=~ /($s)/){print "wahr, gefunden wurde $1\n";} else {print "falsch\n";} #hier wird $s genauer untersucht print "Inhalt von \$s: $s \nLaenge von \$s: ".length($s)." Zeichen"; |