Требуется приходящие в почтовый ящик INFO письма от rafek извлекать в отдельный файл (это я сделал), а затем письма с таблицами в формате HTML разбивать на отдельные файлы с разделителем "|" вместо колонок и возвратом каретки вместо строк таблицы. С Перлом столкнулся неделю назад, от прочтения умных книг голова кургом идет (избаловал себя обьектноорентированными языками)
Пока написал следующее:

perl.pl > mail.bux
#!/usr/bin/perl
   open F, "/var/mail/info";
   $MM=0;
   while (<F>) {
     if ($_=~ m/From /) {$MM=0;}
     if ($_=~ m/From rafek/) {$MM=1;}
     if ($MM == 1) {print;}
   }
   close F;

КУДА ДВИГАТСЯ? подскажите, может имеются готовые решения или хотя бы механизм.

Зарание спасибо.