Separate names with a comma.
хм...пролистал код вниз (как делают по вашей ссылке) и нашел вот что: а дальше нулевые байты:) много... поставил туда бп, сделал дамп, открываю...
Решил научиться распаковывать. Т.к. по жизни ничего с первого раза не получается - нагуглил статью Распаковка UPX для новичков...
даже не сколько не проинициализирована сколько ей не присвоено значение, а ее содержимое как то проверяется (т.е. мб $a - это какойто флаг?)...
Вас хотели обмануть;) чтобы научиться _хорошо_ программировать на perl нужно быть либо психом-гением либо потратить на это _очень_ много времени...