PERL - HTML kód titkosítása

Adott egy perl script ami egy html kódot generál. Jelen esetben a Shoutcast rádiós felhasznalók hallgatási linkjeit (WMPlayer, Winamp hallgatasi linkek, stb...).
Ha statikus oldalról lenne szó akkor a http://www.iwebtool.com/html_encrypter oldalon letitkosítom és kész. Itt viszont mindig változó HTML oldalt vagy annak egy részletét kellene titkosítani. Az iwebtool oldal viszonylag egyszerűen enkódol: az összes karaktert átalakítja %xx formátumra, belepakolva egy java scriptbe. Ez a mezei usernek már bőven elég, tehát nem igényel a dolog nagyon nagy varázslatot.
Létezik egy perl script ami a %xx karaktereket átalakítja normál karakterekké: $str=~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
Ez esetben most ennek a fordítottját kéne megoldanom.

Help pls!

Hozzászólások

$str=~s/(.)/sprintf"%%%02x",ord$1/egs;