我尝试删除所有字符串，如果他们的第一个或最后一个单词是这个单词列表之一：＆＃34; the 一世 在 那里 这个 同 上 我们 那 的＆＃34;
例如，如果我在输入文件中有这个字符串＆＃34;和我一起＃34;此字符串将被删除，
实施例： 的 输入
"the european union"
"would like to"
"would like"
"of the european"
"the european parliament"
"the member states"
输出
"would like to"
"would like"
我有这个想法在我看来有点困难：
my @small = qw(the i in there this with on we that of);
my $small_re = join "|", @small;
$small_re = qr(^(?:$small_re)|(?:$small_re)$);
if ($sequence !~ /$small_re/) {
#...
}
还有其他想法吗？
谢谢
答案 0 :(得分：0)
^(?=the|i|in|there|this|with|on|we|that|of).*$|^(?=.*(?:the|i|in|there|this|with|on|we|that|of)$).*$
试试这个。empty string。见。演示。