Einführung in Perl, Sixth Edition

Der Bindungsoperator =~

Ein Mustervergleich mit dem Inhalt von $_ ist bloß das Standardverhalten. Der Bindungsoperator (=~) weist Perl an, einen Mustervergleich mit dem String links vom Operator durchzuführen, anstatt dafür $_ zu benutzen,^[222] zum Beispiel so:

my $was_anderes = "Ich traeume von Betty Geroellheimer.";
if ($was_anderes =~ /\bGer/) {
  print "Oho, da liegt der Hase im Pfeffer.\n";
}

Wenn Sie den Bindungsoperator zum ersten Mal sehen, wirkt er wie eine Art von Zuweisungsoperator. Das ist er aber nicht. Er besagt: »Die Mustererkennung, die sonst mit $_ durchgeführt wird, soll stattdessen mit dem String links von mir durchgeführt werden!«

In dem unten stehenden (etwas ungewöhnlichen) Beispiel wird der Variablen $mag_perl abhängig von der ...