Уважаемые коллеги!
Помогите пожалуйста решить проблему следующего характера:
Некоторое web-приложение написано на perl, состоит из нескольких скриптов *.pl.   Возникла необходимость внести в текст изменения - в приложении не предусматривалась работа после 2009 года и соответственно все ниспадающие html-списки (select->option) с выбором года заканчиваются строкой 2009. Но именно тот файл (тоже с расширением pl), в котором записан этот html, в отличие от остальных, не читается в редакторе. То есть читается, но приблизительно в таком виде:
--<SELECT NAME=
Такое впечатление, что файл откомпилирован. Возможно есть другое объяснение, не могу сказать точно, так как с перл я не работал никогда.
Суть вопроса - как в данный файл внести изменения?
Заранее благодарен.    

Похоже вам нужно выбрать верную кодировку в текстовом редакторе.
Выложите сюда этот скрипт.

выкладываю скрипт. Правда, боюсь что дело не в кодировке - остальные скрипты открываются без проблем... 

Присоединённый файл ( Кол-во скачиваний: 17 )
 bars.pl 611,02 Kb

Это байткод, полученный с помощью модуля ByteLoader.
Как из него получить обратно исходник я не знаю, скорее всего никак.

Это ужасно.
я почему-то думал что в наше время не осталось программ, для которых отсутствуют декомпиляторы... 
   ПОМОГИТЕ!!! HELP!!!

<a href='http://www.opennet.ru/openforum/vsluhforumID9/898.html' target='_blank'>Здесь</a> про это написано вроде, только по причине полного профанства в перле я даже понять не смог ничего, о чём там написано   

может B::Disassembler поможет? Попробуйте, о результатах хорошо бы узнать.

Он покажет текстовое представление сгенеренного байткода.
"Дословно" получить исходный код из байткода нельзя (если он не был создан особым образом). Но восстановить логику и переписать ручками, в принципе, возможно. Но сложно.

Наверняка можно найти место с годами и добавить несколько аналогичных строк.
А вообще надо спросить автора скрипта и, наконец, заплатить ему за работу.

Это сообщение отредактировал(а) mvsgt - 11.1.2010, 17:49

хм...    Наверно совсем я тяжёлый... простите за невежество. Но если B::disassembler - это программа - дизассемблер, то я просто не знаю где её скачать, а если это команда или что-то ещё-  ... тогда вообще караул!!! Просветите, pls, невежду...

Добавлено через 3 минуты и 24 секунды
А по поводу автора - он уже давно не работает, и в организации в которой он написал этот скрипт, исходников он конечно же не оставил. Так что он не обижен.

http://search.cpan.org/perldoc?B::Disassembler