Тема: [Perl] Извлечение текста
Показать сообщение отдельно

  #7  
Старый 09.04.2010, 19:18
Kaimi
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
С нами: 9851426

Репутация: 1676


По умолчанию
Ну напиши $text = join "\n", @stih;
Или читай содержимое файла по-другому...
 
Ответить с цитированием