Разбить массив по словам http://webonrails.ru/forum/perl/topic/352/

http://webonrails.ru/forum/perl/topic/352/

Здравствуйте!

Стоить задача разбить массив по словам, разделить слов это пробел. Поясню:

@arr_sentence = ('This is my str_1', 'This is my str_2', 'This is my str_3');

Хочу получить следующий массив:

This
is
my
str_1

И т.д. со вторым элементом. Подскажите пожалуйста как это можно сделать в PERL? Если можно, то не сильно накрученный код, мне нужен минимум строк.

 1  |   88  |   6 июля 2011 22:05  |   rediska [3]

Вернуться к: Форум PERL » PERL для профессионалов

страницы: 1  [ 1 ]

Сообщения:

 hill [4] | 7 июля 2011 00:16

Вот так можно:

@arr_str = ('This is my str_1', 'This is my str_2', 'This is my str_3'); @arr_words = split(/\s+/,join(' ',@arr_str));  print $_, "\n" foreach (@arr_words); //печать