Удаляют кладжи @INTL и @TOPT. Вообще-то, должно работать и без этого, но у меня HPT собрался с перлом таким образом, что без этого портит скопированые мессаги. Выкусывает из них куски в произволиных местах. Обычно в начале и в конце.
BR>> $k = 0;
BR>> while( defined $readdress{$k} ){ BR>> if ( $fromaddr ne $readdress{$k} ) { BR>> putMsgInArea( "NetMail", $fromname, $toname, BR>> $fromaddr, BR>> $readdress{$k}, $subject, $date, $attr, BR>> "\001Rem: copy to $readdress{$k}\r$text", 2 ); BR>> $change = 1;
MS> что такое $change=1; ?
Говорит HPT, что текст письма изменился и нужно его обновить перед записью в базу.
MS> Спасибо заранее,
Не за что.
MS> просто чтобы не как попка дурак скопировать а понять как это MS> работает?
Спрашивай, ежели чего.
MS> насколько я понял берутся все адреса и конфига и пересылаются на 3 MS> верхних адреса, так ?
Да. Все, что пришло на любой из АКА из конфига пересылается на перечисленные адреса, кроме того, с которого пришло, если он из списка (сам себе писал).
PS: У меня еще там разююкивалка из всех эх есть. Нада?