LINUX.ORG.RU

Ответ на: комментарий от anonymous

Весч хорошая, но к сожалению не катит. Мне такой способ отправки смс (через электропочту) нужен для автоматизации процесса оповещения, енто позволит мне не лазит на емыл за отчетами, а получать их смской.

aspell
() автор топика

узнай у своего оператора, не все такое позволяют.

sid350 ★★★★★
()
Ответ на: комментарий от aspell

билайн позволяет, у меня такая штука уже 6 лет работает, оповещает.

vilfred ☆☆
()

Раньше были такие бесплатные общедоступные сервисы, назывались smtp to sms gateway, помоему все благополучно загнулись. Многие операторы gsm предоставляют такой персональный сервис бесплатно (если даже не все). Если поискать можно найти за деньги. Проще наверно присобачить дешевый мобильник к серверу на компорт - ПО в интернете полно для для этого (можно просто через at команды слать без всякого ПО), и купить какой-нить тариф с символической платой за смс. Есть парсилки готовые которые ужимают текст письма до 160 символов - от кого,кому и с чем примерно :)

koTuk
()
Ответ на: комментарий от koTuk

Я давно делал на сервере такое - если кому надо, подключали сервис у оператора своего, говорили мне адрес электронный, я через процмайл скармливал его входящие парсилке и перенаправлял на этот адрес.

koTuk
()
Ответ на: комментарий от koTuk

телефон, по которому активируется услуга билайна доставки 
sms-сообщений на мобильник 06849909

далее они присылают в СМСке адрес, на который надо слать сообщения 
вида 790550484XX@sms.beemail.ru

потом пишется например такой скрипт, который отправляет сообщения:

#!/usr/bin/perl -w

use lib '/home/rel/ivan/nasa/File-Tail-0.99.1/blib/lib/';
use lib '/home/rel/ivan/nasa/MIME-Lite-3.01/blib/lib/';
use MIME::Lite;
use File::Tail;
$l = '/home/rel/ivan/nasa/socket_demo.log';

my $m1="790550484XX\@sms.beemail.ru";
&tail_socket();
#06849909


do{
  $k.=$_ if $_!~m/PKT.*?===END===/s;
  do{
    $a=$1 if $k=~m!BURST_RA:\s+?(.*?)d!s;
** Joe's Own Editor v2.9.7 ** Copyright (C) 2001 **
  do{
    $a=$1 if $k=~m!BURST_RA:\s+?(.*?)d!s;
    $d=$1 if $k=~m!BURST_DEC:\s+?(.*?)d!s;
    $p.=$1 while $k=~m!COMMENTS?:?\s+?(.*?)\n!gs;
print "[$a $d $p]\n";
#    qx[perl /home/rel/ivan/nasa/mail.pl $a $d $p] if $a and $d;
   &message($a,$d,$p) if $k!~m/Type= 2\s/;
    $p=''; $k=''; $a=''; $d='';
  } if $k=~m!PKT.*?BURST_RA.*?BURST_DEC.*?===END===!s;
  $k='' if $_=~m!PKT.*?===END===!s;
} while($_=$fi->read);

sub tail_socket{
  return $fi = File::Tail->new(
    name => $l,
    maxinterval => 0.1,
    adjustafter => 1000000000,
    interval => 4,
    tail => 0)
}

sub message{
  my $msg = MIME::Lite->new( From    => 'GRB',
                           To      => "$m1",
                           Subject => 'grb',
                           Type    => 'text/plain',
                           Data    => "a: $_[0] d: $_[1] $_[2]" );

  $msg->send();
}



Эта схема работает только в случае прямой отправки с демона, 
ответственного за мыло. Форвард билайн редиректит, т.е. в настройках 
халявных почтовых ящиков врядли получится получать смски вписав форвард...

vilfred ☆☆
()

Всем спасибо, пойду сегодня в МТС.

aspell
() автор топика

жабир+мылру транспорт в качестве резервного канала не подойдет?

имхо доходит быстрее, чем через мейл-гейты

lazyklimm ★★★★★
()

У моего оператора даже можно себе выбрать адрес - типа vasja.pupkin@sms.lmt.lv...

true
()

smsmail.ru - платно правда, но не дорого:) Работают без косяков, юзаю их больше года

FatBastard ★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.