Select Code to Download

print "^:" . strlen($password ^ substr($enc_text, 0, $iv_len)) . "\n";

for ($x=0; $x<$iv_len; $x++) { printf("%02x ", ord(substr($enc_text,$x
+,1))); }
print "\n";
...
print "\n";
for ($x=0; $x<$iv_len; $x++) { printf("%02x ", ord(substr($password,$x
+,1))^ord(substr($enc_text,$x,1))); }
print "\n";

5c 79 e1 71 1c cc ba 8e b7 46 aa 99 99 bc 56 d6
74 65 73 74 00 00 00 00 00 00 00 00 00 00 00 00
28 1c 92 05 1c cc ba 8e b7 46 aa 99 99 bc 56 d6

sub md5_decrypt
{
...
    #$plain_text =~ s/\x13\x00*$//;
    return $plain_text;
}