Не специалист в Perl. Но использовать awk-like replacements для работы с бинарниками - так себе идея.
У тебя в примере такой кейс. Дан двоичный файл и надо заменить в нем байты
01 02 03
на байты
04 05 06
. Ето один кейс? Или возможны другие? 3 на 2 байта можно менять?
В этом случае размер файла изменится. И нужно-ли сделать один реплейсмент? Или найти все возможные?
Я думаю что тебе надо найти сишника, поставить ему пиво и он тебе 1 раз напишет утилиту для патчей и будешь ей всегда пользоваться.
Или попробуй разберись вот как тут пишут
https://stackoverflow.com/questions/2464334/how-ca...