Декодер пароля из sim-icq

[ocehb]

perl -Mencoding=utf8 -le '$a = 0x4345; 
  print join "",map { $b = chr ($a ^= hex $_); $a = hex $_; $b } 
  split /\$/,$ARGV[0];'

Comments

еще раз

[owssrmn.livejournal.com]

спасибо.

[lav14.livejournal.com]

ух ты, блин, с что это такое? опять муравка нужна!

[ocehb]

это тайные масонские знаки! :)

[uzeboster.livejournal.com]

Народ, я тут смотрю вы на Перле рубаете не хило.
Посоветуте грамотному книжку (в эл. варианте) для начинающего.
Заранее благодарен.

[ocehb]

на o'reilly perl bookshelf есть learning perl и programming perl, по моему мнению очень хорошие книги. (ftp://ftp.e6.ru/pub/books/O'Reilly/PERL%20Bookshelf%20ver%203.rar)

[ocehb]

можно еще спросить на ru_perl.

[sillysunnybear.livejournal.com]

никуя не помогло, выдало 2 ошибки и 7 символов в УТФе, а чего с ними делать, не понятно... (ибо ввести их такими, которыми выдало, никакой возможности не представляется...)

[ocehb]

смотреть надо, так ничего не сказать.

[sillysunnybear.livejournal.com]

Спасибо, я воспользовался
Advanced IM Password Recovery
отсюда
http://www.lock-team.ru/downloads+Internet/