LINUX.ORG.RU

Perl: удаление начала файла


0

0

Привет. Хочу преобразовать Nero image в ISO. Я нашел утилитку на С, из сорцов которой видно, что nero image отличается от ISO каким-то довеском впереди фиксированного, который нужно убрать. Прямой путь - открыть .nrg для чтения, сдвинуть seek-ом на начало ISO image, и записать ISO (так эта утилита на С и делает), потом удалить nrg, кторый занимает много места и не нужен. Но, я нашел в Perl Cookbook пример, как можно удалить *хвост* файла, не создавая второй файл - это сделать open(SRC, "<+$fname") и сделать truncate(SRC, $file_size). Можно что-то подобное сделать с началом файла, не переписывая его практически целиком заново?

Спасибо большое.


Ни в перл ни в другом языке такое не возможно.

roller ★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.