Вариант для распечатки		Пред. тема | След. тема
Форум Программирование под UNIX (Perl)
Режим отображения отдельной подветви беседы		[ Отслеживать ]

Возможно ли на regexp perl удалить определенное число байтов?, zhukovia (ok), 05-Фев-20, (0) [смотреть все] Забыл добавить подобная последовательность x00 x00 может быть не один раз вну, zhukovia (ok), 13:41 , 05-Фев-20, (1)   // На перле это делается как два пальца об асфальт, остается только понять что тако, Pahanivo (ok), 14:10 , 05-Фев-20, (2) +1   // Согласен что нужно четко описывать, но проблема в том что эти 1-2 символа никак , zhukovia (ok), 07:23 , 06-Фев-20, (6)   // Это сферическое черезжопу в вакууме Внизу есть решение нарезки по 70 , Pahanivo (ok), 12:27 , 06-Фев-20, (10)   Что-то такое, если я вас верно понял clean do use bytes str s 68 x0, Аноним (3), 00:14 , 06-Фев-20, (3) // Так оно не проверит на xE3 x33 Нужно тщательнее clean do use bytes str , ACCA (ok), 01:11 , 06-Фев-20, (4) // Если в данных не бывает 0 0, удаляемый кусок всегда 70 байт и оканчивается двум, Аноним (3), 03:31 , 06-Фев-20, (5) // x00 - что это значит Есть ххх заглядывание вперед xxx заглядывание , Pahanivo (ok), 12:20 , 06-Фев-20, (8) Думал сначала написать x00 , а потом исправил и знак равно забыл убрать Ре, Аноним (3), 00:47 , 07-Фев-20, (11) Дак афтур и толком задачу не сформулировал - в оригинальной формулировке ее вооб, Pahanivo (ok), 14:02 , 07-Фев-20, (14) Примерно же понятно Есть какой-то бинарный протокол, по которому чанки данных и, Аноним (3), 14:37 , 07-Фев-20, (15) x00 как я понимаю эта конструкция будет искать x00 2 после которых нет , zhukovia (ok), 07:29 , 06-Фев-20, (7) // видимо тут x00 , и видимо оно будет учитывать что в мусоре x00 не только в , Pahanivo (ok), 12:26 , 06-Фев-20, (9) Да, - опечатка, должно быть Конструкция смотрит 2 нулевых байта, после кот, Аноним (3), 00:50 , 07-Фев-20, (12) // Значит я правильно понял , Pahanivo (ok), 14:01 , 07-Фев-20, (13) Этому определению строки строго соответствует регексп code 0,2 xE3 x33 , U.N.Owen (?), 14:05 , 08-Фев-20, (16) –1 // Ага Разжуй две ситуации, в которых твой regex не сработал 1 Перед xE3 x33 , ACCA (ok), 21:06 , 10-Фев-20, (17) // И 0, 2 , если что, включает в себя 1 Регексп работает и ожидает 70 символов , U.N.Owen (?), 19:45 , 28-Мрт-20, (18) 1,3,16

Сообщения

[Сортировка по времени | RSS]

1. "Возможно ли на regexp perl удалить определенное число байтов?"	+/–
Сообщение от zhukovia (ok), 05-Фев-20, 13:41
Забыл добавить подобная последовательность (\x00\x00) может быть не один раз внутри "мусора". И начинается не строго с \xE3\x33. В начале бывает еще 1-2 символа произвольных, но длинна всегда 70 байт.
Ответить | Правка | Наверх | Cообщить модератору

	2. "Возможно ли на regexp perl удалить определенное число байтов?"	+1 +/–
	Сообщение от Pahanivo (ok), 05-Фев-20, 14:10
	> Забыл добавить подобная последовательность (\x00\x00) может быть не один раз внутри "мусора". > И начинается не строго с \xE3\x33. В начале бывает еще 1-2 > символа произвольных, но длинна всегда 70 байт. На перле это делается как два пальца об асфальт, остается только понять что такое "бывает 1-2 символа" и как эти два символа отличить от остальной части строки. Регексы требуют четкости, а не размытых формулировок.
	Ответить | Правка | Наверх | Cообщить модератору

	6. "Возможно ли на regexp perl удалить определенное число байтов?"	+/–
	Сообщение от zhukovia (ok), 06-Фев-20, 07:23
	>> Забыл добавить подобная последовательность (\x00\x00) может быть не один раз внутри "мусора". >> И начинается не строго с \xE3\x33. В начале бывает еще 1-2 >> символа произвольных, но длинна всегда 70 байт. > На перле это делается как два пальца об асфальт, остается только понять > что такое "бывает 1-2 символа" и как эти два символа отличить > от остальной части строки. > Регексы требуют четкости, а не размытых формулировок. Согласен что нужно четко описывать, но проблема в том что эти 1-2 символа никак не отличить от нормальной строки поэтому я пошел другим путем. Сначала перевернул строку, а потом искал \x00\x00 и от них уже искал 70 байт и вырезал, потом строку обратно переворачивал. $row = reverse($row); $row=~s/\x00\x00.{68}//g; $row = reverse($row); Возможно перевороты туда сюда и не оптимальны но это работает.
	Ответить | Правка | Наверх | Cообщить модератору

	10. "Возможно ли на regexp perl удалить определенное число байтов?"	+/–
	Сообщение от Pahanivo (ok), 06-Фев-20, 12:27
	> Согласен что нужно четко описывать, но проблема в том что эти 1-2 > символа никак не отличить от нормальной строки поэтому я пошел другим > путем. Сначала перевернул строку, а потом искал \x00\x00 и от них > уже искал 70 байт и вырезал, потом строку обратно переворачивал. > $row = reverse($row); > $row=~s/\x00\x00.{68}//g; > $row = reverse($row); > Возможно перевороты туда сюда и не оптимальны но это работает. Это сферическое "черезжопу" в вакууме. Внизу есть решение нарезки по 70.
	Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить

Рекомендовать для помещения в FAQ | Индекс форумов | Темы | Пред. тема | След. тема