Создание серверных приложений на языке PERL




Оператор qw//



Оператор qw//

qw/строка/;

Возвращает список, элементы которого содержат слова из строки. Т.е. пробелы рассматриваются как символы-разделители.
Следующий код подчеркнет все слова фразы, длиной 7 букв:

@array = qw(Пока толстый сохнет, худой - сдохнет); foreach $i(@array){ if (length($i) == 7){print "$i "} else {print "$i "} }

Содержание Назад Вперед