Работа с почтовым сервером

<? 
include("function.php");
$pop_conn = fsockopen("pop.mail.ru", 110,$errno, $errstr, 10);
print fgets($pop_conn,1024); 
fputs($pop_conn,"USER *****\r\n"); // логин юзера
print fgets($pop_conn,1024); 
fputs($pop_conn,"PASS *****\r\n"); // пароль юзера
print fgets($pop_conn,1024);
 
fputs($pop_conn,"STAT\r\n");
$count = fgets($pop_conn,1024);
$count = explode(' ',$count); //разбивает строку на подстроки
$count = $count[1];
                print_r ($count[1]);
echo "1";
for ($j=1;$j<=$count;$j++) 
    {
        //$text=0;
        $number = "$j";
 
        if (file_exists("$number")) // проверка папки 
        {
            echo "exists <br/>";
        }
        else
        {    
            mkdir("$number");
 
            echo "$number <br/>";
            fputs($pop_conn,"RETR ".$number."\r\n");// чтение письма
            $text.= get_data($pop_conn);
 
            $struct=fetch_structure($text); //функция возвращает заголовки и тело письма
            $mass_header=decode_header($struct['header']);//разбирает все заголовки и выводит массив, в котором каждый элемент является соответсвующим заголовком
        /*  echo "<br>"; // выводит заголовки
            print_r ($mass_header);*/
            $mass_header["subject"] = decode_mime_string($mass_header["subject"]);//кодировка письма
            $type = $ctype = $mass_header['content-type'];
            $ctype = split(";",$ctype); //split делает из строки массив с помощью регулярного выражения.
 
            $types = split("/",$ctype[0]);//split делает из строки массив с помощью регулярного выражения.
            $maintype = trim(strtolower($types[0])); //удаляет пробелы с начало и конца строки
            $subtype = trim(strtolower($types[1])); 
//print_r ($types);
//print_r ($subtype);           
print_r ($mass_header);
            if($maintype=="multipart" and ereg($subtype,"signed,mixed,related"))
            {
                $boundary=get_boundary($mass_header['content-type']);
 
                $part = split_parts($boundary,$struct['body']); // если письмо будет состоять из нескольких частей (текст, файлы и т.д.)
// то эта функция разобьет такое письмо на части (в массив), согласно разделителю boundary
 
                for($i=0;$i<count($part);$i++) 
                {
 
                    $email = fetch_structure($part[$i]);
                    $header = $email["header"];
                    $body = $email["body"];
                    $headers = decode_header($header);
                    $ctype = $headers["content-type"];
                    $cid = $headers["content-id"];
                    $Actype = split(";",$headers["content-type"]);//split делает из строки массив с помощью регулярного выражения.
                    $types = split("/",$Actype[0]);//split делает из строки массив с помощью регулярного выражения.
                    $rctype = strtolower($Actype[0]);
 
                    $is_download = (ereg("name=",$headers["content-disposition"].$headers["content-type"]) || $headers["content-id"] != "" || $rctype == "message/rfc822");
                    if($rctype == "text/plain" && !$is_download) 
                    {
                        $body = compile_body($body,$headers["content-transfer-encoding"],$headers["content-type"]);
                        print $body;
                    }
 
                    elseif($rctype == "text/html" && !$is_download) 
                    {
                        $body = compile_body($body,$headers["content-transfer-encoding"],$headers["content-type"]);
                        print $body;
                    }
                    elseif($is_download) 
                    {
                        $cdisp = $headers["content-disposition"];
                        $ctype = $headers["content-type"];
                        $ctype2 = explode(";",$ctype);
                        $ctype2 = $ctype2[0];
                        $Atype = split("/",$ctype);//split делает из строки массив с помощью регулярного выражения.
                        $Acdisp = split(";",$ctype);//split делает из строки массив с помощью регулярного выражения.
                        $fname = $Acdisp[1];
                        if(ereg("name=(.*)",$fname,$regs))
                        $filename = $regs[1];
                        if($filename == "" && ereg("name=(.*)",$ctype,$regs))
                        $filename = $regs[1];
                        $filename = ereg_replace("\"(.*)\"","\\1",$filename);
                        $filename = trim(decode_mime_string($filename));
                        $ext = explode('.',$filename);
                        $ext = $ext[1];
                        if ($ext=='xls') 
                        {
                            $body = compile_body($body,$headers["content-transfer-encoding"],$ctype2);
                            $ft=fopen("$number/$filename","wb");
                            fwrite($ft,$body);
                            fclose($ft);
                            
                        }
 
                            $ext = explode('.',$filename);
                            $ext = $ext[1];
 
                        if ($ext=='xls') 
                        {
                            $objPHPExcel = PHPExcel_IOFactory::load("$number/$filename");
                            $objPHPExcel->setActiveSheetIndex(0);
                            $aSheet = $objPHPExcel->getActiveSheet();
                            $aSheet->getRowDimension('1')->setVisible(false);
                            $aSheet->getRowDimension('2')->setVisible(false);
                            $objWriter = new PHPExcel_Writer_Excel5($objPHPExcel);
                            $objWriter->save("$number/$filename"); 
 
                        }
                    }
                }
            }
            
            //fputs($pop_conn,"QUIT\r\n");
        }
    }
 
?>