紅糖糍粑
2021-10-13 21:11:53
例如文件1.text是這樣的一段話:Walmart chief executive Douglas McMillon defends company's decision to invest billions in improving its stores and Internet shopping presence。希望能夠找到Mcmillan附近6個(gè)英文詞中是否出現(xiàn)的decision這個(gè)詞,應(yīng)該用哪個(gè)函數(shù)?非誠(chéng)勿擾或者[0-9]個(gè)英文詞都可以,想問(wèn)問(wèn)用什么函數(shù)
1 回答

藍(lán)山帝景
TA貢獻(xiàn)1843條經(jīng)驗(yàn) 獲得超7個(gè)贊
while
(
$str
= <DATA>) {
my
@p
= (0xFFFFFFFF, 0xFFFFFFFF);
my
$i
= 0;
while
(
$str
=~ /(\w+)/g) {
if
($1 eq
'decision'
) {
$p
[0] =
$i
;
if
(
abs
(
$p
[0] -
$p
[1]) <= 6){
print
"matched\n"
;
last
;}}
elsif
($1 eq
'McMillon'
) {
$p
[1] =
$i
;
if
(
abs
(
$p
[0] -
$p
[1]) <= 6){
print
"matched\n"
;
last
;}}
$i
++;
}
}
__DATA__
Walmart chief executive Douglas McMillon defends company's decision to invest billions in improving its stores and Internet shopping presence。
添加回答
舉報(bào)
0/150
提交
取消