Разное > Поиск, изготовление скриптов и прочее...

Очень нужны Cкрипты: Недвижимости , Трудоустройства , Доски объявлений!!!

<< < (2/2)

commander:
сорри в первый раз форум слогал... :
#!/usr/bin/perl -w
use strict;
use MIME::Lite;
my $var=0;
while ($var[$NI])
{
my $msg = MIME::Lite->new(
From    =>altryist@mail.ru,
To      =>$to,
Subject =>"супермегапортала!!!",
Type    =>\'multipart/related\'
);
$msg->attach(Type => \'text/html\',
Data => qq{





супермегапортала!!!

}
);
$msg->send();
$var++
}

Mog.:
[OFF]
--- Цитировать ---AliMamed:
2-х мегабайтными кусками
--- Конец цитаты ---
Интересно, а сколько всего файлов получится? А печатать как? Покадрово? Или через Ворд, как текст? А если встретятся непечатаемые символы, можно будет их заменить на непечатные? А первым номером шрифта на матричном принтере подойдет? Тока ленточка в принтере слабая уже. :)
[/OFF]

Навигация

[0] Главная страница сообщений

[*] Предыдущая страница