|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander V. Gaiduk 2:5020/400 31 Oct 2005 13:11:46 To : Ivan Frolkov Subject : Hа: Заменить в exe файле. *) -------------------------------------------------------------------------------- "Ivan Frolkov" <lala@mail.ge> сообщил/сообщила в новостях следующее: news:3648417612@p2.f175.n5020.z2.ftn... > Mon Oct 31 2005 03:57, Maxim L. Mazur wrote to All: > > MLM> Hужно найти и заменить в сабже несколько строк. > MLM> Строки могут быть как текстовые, например "Distribution", так и > MLM> символьные, например 0x4AB512A3. Размер исходной и заменяемой строки > MLM> может быть разный. > MLM> Файл бинарный. Дайте простейший пример. > > Берешь и меняешь любым способом - все равно файл получится битый. если грамотно попросить товарища "binmode" - будет не битый. на пальцах: open(...) seek(...) # куда заменять будем + размер заменяемого read(...) # до конца файла seek(...) # куда заменять будем write(...) # заменитель write(...) # то, что читали до конца close(...) хотя для .exe файла фокус с неравным размером заменяемого и заменителя может быть весьма плачевным... --- ifmail v.2.15dev5.3 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/75747ca442b6.html, оценка из 5, голосов 10
|