Помогите доработать код скачки вложений из почтового сервера

Друзья,

есть такой код, который посредством IMAP подкючается к почтовому серверу и скачивает xls-вложения из писем.

Как сделать, чтобы файлы сохранялись в такой форме:

если файл пришел с емайла pupkin-vasa@mail.ru - то файл бы был pupkin-vasa.xls
если во вложении 2 и более файла - то 2-ое вложение - pupkin-vasa2.xls, 3-е вложение - pupkin-vasa3.xls и т.д.

если файл пришел с емайла sidorov-kolya@mail.ru - то файл бы был sidorov-kolya.xls
если во вложении 2 и более файла - то 2-ое вложение - sidorov-kolya2.xls, 3-е вложение sidorov-kolya.3xls и т.д.

И в конце исполнения кода чтобы все письма на почтовом сервере удалились.

Спасибо за помощь!

PHP:

1. <?php
2. set_time_limit(3000);
3. $hostname = '{pop.rambler.ru:110/pop3}INBOX';
4. $username = '*******@ro.ru';
5. $password = '********';
6. $inbox = imap_open($hostname,$username,$password) or die('Cannot connect  ' . imap_last_error());
7. $emails = imap_search($inbox,'ALL');
8. $max_emails = 16;
9. if($emails) {
10.     $count = 1;
11.      rsort($emails);
12.      foreach($emails as $email_number)
13.     {
14.         /* get information specific to this email */
15.         $overview = imap_fetch_overview($inbox,$email_number,0);
16.         /* get mail message */
17.         $message = imap_fetchbody($inbox,$email_number,2);
18.         /* get mail structure */
19.         $structure = imap_fetchstructure($inbox, $email_number);
20.         $attachments = array();
21.         /* if any attachments found... */
22.         if(isset($structure->parts) && count($structure->parts))
23.         {
24.             for($i = 0; $i < count($structure->parts); $i++)
25.             {
26.                 $attachments[$i] = array(
27.                     'is_attachment' => false,
28.                     'filename' => '',
29.                     'name' => '',
30.                     'attachment' => ''
31.                 );
32.                 if($structure->parts[$i]->ifdparameters)
33.                 {
34.                     foreach($structure->parts[$i]->dparameters as $object)
35.                     {
36.                         if(strtolower($object->attribute) == 'filename')
37.                         {
38.                             $attachments[$i]['is_attachment'] = true;
39.                             $attachments[$i]['filename'] = $object->value;
40.                         }
41.                     }
42.                 }
43.                 if($structure->parts[$i]->ifparameters)
44.                 {
45.                     foreach($structure->parts[$i]->parameters as $object)
46.                     {
47.                         if(strtolower($object->attribute) == 'name')
48.                         {
49.                             $attachments[$i]['is_attachment'] = true;
50.                             $attachments[$i]['name'] = $object->value;
51.                         }
52.                     }
53.                 }
54.                 if($attachments[$i]['is_attachment'])
55.                 {
56.                     $attachments[$i]['attachment'] = imap_fetchbody($inbox, $email_number, $i+1);
57.                     /* 4 = QUOTED-PRINTABLE encoding */
58.                     if($structure->parts[$i]->encoding == 3)
59.                     {
60.                         $attachments[$i]['attachment'] = base64_decode($attachments[$i]['attachment']);
61.                     }
62.                     /* 3 = BASE64 encoding */
63.                     elseif($structure->parts[$i]->encoding == 4)
64.                     {
65.                         $attachments[$i]['attachment'] = quoted_printable_decode($attachments[$i]['attachment']);
66.                     }
67.                 }
68.             }
69.         }
70.         /* iterate through each attachment and save it */
71.         foreach($attachments as $attachment)
72.         {
73.             if($attachment['is_attachment'] == 1)
74.             {
75.                 $filename = $attachment['name'];
76.                 if(empty($filename)) $filename = $attachment['filename'];
77.                 if(empty($filename)) $filename = time() . ".dat";
78.                 /* prefix the email number to the filename in case two emails
79.                  * have the attachment with the same file name.
80.                  */
81.              
82.                 $fp = fopen($email_number . "-" . $filename, "w+");
83.                 fwrite($fp, $attachment['attachment']);
84.                 fclose($fp);
85.             }
86.         }
87.         if($count++ >= $max_emails) break;
88.     }
89. }
90. /* close the connection */
91. imap_close($inbox);
92. echo "Done";
93. ?>

 

сам разобрался, можно удалять.