Perl 编程/正则表达式

正则表达式是用于复杂文本搜索的工具，被认为是 Perl 语言最强大的方面之一。 正则表达式可以像您要查找的文本一样简单，也可以包含通配符、逻辑甚至子程序。

要在 Perl 中使用正则表达式，请使用=~运算符将包含您的文本的变量绑定到正则表达式

  $Haystack =~ /needle/;

如果"needle" 包含在$HayStack中，则返回 1，否则返回 0。

  $Haystack =~ /needle/i;       # The i means "case-insensitive"

  $Haystack =~ /(needle|pin)/;  # Either/or statements

  $Haystack =~ /needle \d/;     # "needle 0" to "needle 9"

正则表达式还可以用于修改字符串。 您可以使用正则表达式格式搜索和替换复杂的模式s///

  $msg = "perl is ok";
  $msg =~ s/ok/awesome/;        # search for the word "ok" and replace it with "awesome"

($msg现在是"perl is awesome")