Ошибка в коде..какая строка?

<?
set_time_limit(0);
header('Content-type:text/html;charset=UTF-8');

switch ($_GET['a']){
default:
echo '<form name="act" action="rus.php?a=act" method="POST">
Link:<br>
<input name="link" type="text" value="">
<input type="submit" name="" value="Парсить">
</form>';
break;

case "act":

function translit($in, $r = 0)
{
$trans2 = array('JO', 'ZH', 'CH', 'SH', 'SCH', 'JE', 'JY', 'JA', 'jo', 'zh',
'ch', 'sh', 'sch', 'je', 'jy', 'ja', 'A', 'B', 'V', 'G', 'D', 'E', 'Z', 'I', 'J',
'K', 'L', 'M', 'N', 'O', 'P', 'R', 'S', 'T', 'U', 'F', 'H', 'C', 'q', 'Y', 'a',
'b', 'v', 'g', 'd', 'e', 'z', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'r', 's',
't', 'u', 'f', 'h', 'c', 'q', 'y', '__');
$trans1 = array('Ё', 'Ж', 'Ч', 'Ш', 'Щ', 'Э', 'Ю', 'Я', 'ё', 'ж', 'ч', 'ш', 'щ',
'э', 'ю', 'я', 'А', 'Б', 'В', 'Г', 'Д', 'Е', 'З', 'И', 'Й', 'К', 'Л', 'М', 'Н',
'О', 'П', 'Р', 'С', 'Т', 'У', 'Ф', 'Х', 'Ц', 'Ь', 'Ы', 'а', 'б', 'в', 'г', 'д',
'е', 'з', 'и', 'й', 'к', 'л', 'м', 'н', 'о', 'п', 'р', 'с', 'т', 'у', 'ф', 'х',
'ц', 'ь', 'ы', '/');
if ($r == 0)
return str_replace($trans1, $trans2, $in);
else
return str_replace($trans2, $trans1, $in);
}




$ql=trim($_POST['link']);
$file=file_get_contents(''.$ql.'');
$filereg_replace('#\?PHPSESSID[a0-z9]{32})#isU','',$file);
preg_match_all('#<a href="/theme/([0-9]{1,7})/">(.*)</a>#Uis',$file,$fil);
preg_match_all('#</a> (.*) <br/>#Uis',$file,$c);

$i=-1;
$fid=fopen('id.txt','w');
$fpage=fopen('page.txt','w');
$fdir=fopen('dir.txt','w');
echo $fil[0][0];
foreach($fil[0] as $v){

$i++;
$idreg_replace('#<a href="\/theme\/(.*)\/">(.*)<\/a>#is','$1',$v);
$vreg_replace('#<a href="\/theme\/(.*)\/">(.*)<\/a>#is','$2',$v);
$dir=translit($v);
$c[0][$i]=str_replace('[','',$c[0][$i]);
$c[0][$i]=str_replace(']','',$c[0][$i]);
$c[0][$i]=str_replace('</a>','',$c[0][$i]);
$c[0][$i]=str_replace('<br/>','',$c[0][$i]);
$c[0][$i]=trim($c[0][$i]);
$re=''.$dir.'';
echo $re;
$page=intval($c[0][$i]/10);
echo ''.$id.'-'.$page.'<br>';
mkdir("$dir/");
fwrite($fid,$id."\r\n");
fwrite($fpage,$page."\r\n");
fwrite($fdir,$re."\r\n");

}
fclose($fdir);
fclose($fid);
fclose($fpage);
$fileid=file('id.txt');
$filepage=file('page.txt');
$filedir=file('dir.txt');
$wx=-1;
$wd=-1;
foreach($filepage as $vpage){
$wx++;
$wd++;
$dir12=trim($filedir[$wd]);
for($i;$i<$vpage;$i++){

$x=curl_init('http://rugame.mobi/theme/?page='.$i.'&id='.trim($fileid[$wx]).'');
curl_setopt($x,CURLOPT_RETURNTRANSFER,1);
$res=curl_exec($;
$resreg_replace('#\?PHPSESSID[a0-z9]{32})#isU','',$res);
preg_match_all('#<a href="/theme/(.*)/(.*)/">Скачать</a>#Uis',$res,$fil);
$f=fopen("link.txt","a");
foreach($fil[0] as $v){
$v=str_replace('<a href="','http://rugame.mobi',$v);
$v=str_replace('">','',$v);
$v=str_replace('</a>','',$v);
$v=str_replace('Скачать','',$v);
$v=''.$dir12.'|'.$v.'';
echo ''.$v.'<br>';
fwrite($f,$v."\r\n");
}
}
fclose($f);
}
echo '<a href="index.php">Допарсить</a><br>';
break;
}
?>