Forum Webscript.Ru
		Программирование => Perl => Тема начата: Error202 от 13 Декабря 2006, 14:34:48
		
			
			- 
				Здравствуйте!
 
 Есть переменная $text, в ней 1Мб текста...
 Есть $query - запрос пользователя...
 
 Как сделать так, чтобы из $text вырезался кусок в 200 символов, который бы содержал полностью или частично $query?
- 
				хы, и еще наверно чтобы сначала поиск был словосочетания целеком, потом проверка словосочетания на возможные варианты со сменой окончаний, потом каждого слова в отдельности без окончания, и еще этот скрипт должен предположить а не имел ли пользователь в виду другую фразу? и вывести любые возможные синонимы? )) надеюсь я угадал, ато как то не уместна будет ирония
			
- 
				:) да нет... Ладно, буду регекспом по первому слову вырезать...
			
- 
				$text =~ m#\\Q$query\\E# && substr ($&.$\',0,200)
			
- 
				Спасибо!