FGHIGate на GaNJa NeTWoRK ST@Ti0N - Просмотр сообщения в эхоконференции RU.HUSKY


	Добро пожаловать, Гость. Пожалуйста авторизуйтесь здесь.

Введите FGHI ссылку:

Присутствуют сообщения из эхоконференции RU.HUSKY с датами от 16 Jul 13 10:00:06 до 31 Mar 24 23:49:12, всего сообщений: 5321

Ответить на сообщение

К списку сообщений

Предыдущее сообщение

Следующее сообщение

= Сообщение: 3598 из 5321 ========================================= RU.HUSKY =
От   : Michael Dukelsky                 2:5020/1042        21 Jan 19 18:05:08
Кому : Brother Rabbit                                      21 Jan 19 18:05:08
Тема : remap & recived
FGHI : area://RU.HUSKY?msgid=2:5020/1042+5c45e0d7
На   : area://RU.HUSKY?msgid=2:5020/1042+5c45c329
= Кодировка сообщения определена как: CP866 ==================================
Ответ: area://RU.HUSKY?msgid=2:460/5858+5c49cb45
Ответ: area://RU.HUSKY?msgid=2:460/5858+5c49cbae
==============================================================================
Привет, Brother!

21 Jan 19 15:44, Michael Dukelsky послал(а) письмо к Brother Rabbit:

MD> Дело не в "красивше".

Чтобы не быть голословным, переписал твой скрипт в соответствии со своим предыдущим письмом. Написанное не проверял.

my @dest_addr=
(
    2:460/5858,
    2:460/58.58,
    2:460/58.10,
);

sub filter()
{
    if (!defined $area)
    {
        # it is netmail
        #--- copy my mail ---------------
        for my $config_addr (@{$config{addr}})
        {
            if( $toaddr eq $config_addr )
            {
                $text =~ s/\x01INTL \d+\:\d+\/\d+ \d+\:\d+\/\d+\r//;
                $text =~ s/\x01TOPT \d+\r//;
                for my $dest_address (@dest_addr)
                {
                    if ( $fromaddr ne $dest_address )
                    {
                        putMsgInArea( "NetMail", $fromname, $toname, $fromaddr,
                                      $dest_address, $subject, $date, $attr,
                                      "\001Rem: copy to $dest_address\r$text", 2 );
                        $change = 1;
                    }
                }
            }
        }
        #--- copy my mail end ---------------
    }
}

Желаю успехов, Brother!
За сим откланиваюсь, Michael.

... node (at) f1042 (dot) ru
--- GoldED+/LNX 1.1.5-b20170303
* Origin: ==<<.f1042.ru.>>== (2:5020/1042)

К главной странице гейта