0

给定一些字符串originalString = "#SomeWord# More words",我希望能够"SomeWord"originalString.

4

3 回答 3

3
my $substr = (split /#/, $originalString)[1];
于 2013-09-10T20:07:30.653 回答
3

/#([^#]+)#/为我工作。

一些语法说明:

  • //标记正则表达式开始和结束的分隔符
  • #文字哈希标记
  • []一个字符类

上面的正则表达式的解释:

  • [^#]任何不是井号的字符
  • [^#]+一个或多个这样的字符
  • ([^#]+)以上的捕获组

在这种情况下,正则表达式查找两个 # 之间的任何非 # 字符。这是一个完整的例子:

my $foo = "#SomeWord# More words";

if ($foo =~ /#([^#]+)#/) {
    print "$1\n";
} else {
    print "no match\n";
}
于 2013-09-10T20:09:49.413 回答
1

您还可以使用正则表达式:

$originalString=~ /\#([^#]+)\#/;
# Now $1 holds your required string
于 2013-09-10T20:08:10.620 回答