Получить названия городов через http запрос

ЗащищенноеСоединение = Новый ЗащищенноеСоединениеOpenSSL();
	Соединение = Новый HTTPСоединение("ru.wiktionary.org",,,,,, ЗащищенноеСоединение);
	Запрос = Новый HTTPЗапрос("/wiki/Категория:Названия_городов_России/ru");
	Ответ = Соединение.Получить(Запрос);
Если Ответ.КодСостояния = 200 Тогда  
	ЧтениеJSON = Новый ЧтениеJSON;
	ЧтениеJSON.УстановитьСтроку(Ответ.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8));
	ЧтениеJSON.Прочитать();
КонецЕсли;