|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : John Lepikhin 2:5070/156 16 May 2002 02:43:23 To : Oleg Gromichalin Subject : Re: Помогите -------------------------------------------------------------------------------- Приветствую, Oleg. !> On 15 May 02 00:01:02 +0900, Oleg -> Artem Chuprina: OG>>> Есть произвольно вводящееся предложение например строка из OG>>> текстового файла. Hадо каждое слово записать в переменную для OG>>> дальнейшей обработки. OG> Пример: OG> Кузю траву бузю тюрю. OG> Слово "Кузю" нады записать например в slovo[1] OG> Слово "траву" нады записать например в slovo[2] OG> Слово "бузю" нады записать например в slovo[3] OG> Слово "тюрю" нады записать например в slovo[4] $str = "Кузю траву бузю тюрю."; @slowo = split ' ', $str; Если надо, чтоб в итоговой переменной не попадались знаки препинания, можно так: @slowo = split /\W+/, $str; p.s. не забудь выставить локаль. -- ... [лесные компьютерщики] {allnet} {ptoss} --- Gnus/5.0808 (Gnus v5.8.8) XEmacs/21.1 (Cuyahoga Valley) * Origin: A poorly-installed InterNetNews site (2:5070/156.0) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/3618642e5f1d4.html, оценка из 5, голосов 10
|