Имам даден текст, в който определена дума се повтаря. Искам текста между две повтарящи се думи да го извадя. Как може да стане?

@fragments = split /word/;

RTFM!
--sdg

Ако ставаше така, щях ли да питам?

Ако не ставаше така, нямаше да ти отговоря.

Хайде напъни се малко, и или разбери как точно става, или ме опровергай, давайки пример как точно НЕ става. Можеш да започнеш с:

man perldoc
perldoc perlvar | less -p '\$ARG'
perldoc -f split

Става както single-line, така и multi-line, все със split. Успех.

RTFM!
--sdg

$text = '

test one 1.I WANT THIS TEXT one two ...

and 2.I WANT THIS TEXT and some text

three 3.I WANT THIS TEXT three end ... ';



push @match, $2 while $text =~ /(\w+\s+)(.+\s+)\1/g;



$" = $/; print"@match"



__END__



output:

1.I WANT THIS TEXT

2.I WANT THIS TEXT

3.I WANT THIS TEXT

Съдържаниет е скрито
Влезте за да го видите