Using perl to send sms through siemens tc65

Using perl to send sms through siemens tc65

am 18.07.2011 15:21:09 von ivwcorporation.matevz

--0016361e7d8055e5dc04a857df31
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: quoted-printable

Hy!

First, I want to say hy to everyone! I am a fresh perl "programmer" (I
learned some things in the past few days), who is happy to get to know a ne=
w
language.
What is my problem? Actually, I did not know where to post this, so I am
just posting on this group (because I am after all a perl beginner). I work
in a company, where they want me to configure a linux centos server, that
would send and receive sms messages through the siemens tc65 terminal
siemens mc65 receiver. My first goal is to get the terminal to send a sms
message. I connected the tc65 to the computer and used minicom to check,
whether the tc65 responds to AT commands.
Well, it responded, but there is also my problem; I do not know, how to
translate that into a perl application. I thought that a module like
GSM::SMS would help me, but without any knowledge about such things, I
cannot do much at this point.

Can you please help me?

Matevž Markovič

--0016361e7d8055e5dc04a857df31--

Re: Using perl to send sms through siemens tc65

am 18.07.2011 20:38:16 von Shlomi Fish

Hi Matevž ,

On Mon, 18 Jul 2011 15:21:09 +0200
Matevž Markovič wrote:

> Hy!
>=20
> First, I want to say hy to everyone! I am a fresh perl "programmer" (I
> learned some things in the past few days), who is happy to get to know a =
new
> language.
> What is my problem? Actually, I did not know where to post this, so I am
> just posting on this group (because I am after all a perl beginner). I wo=
rk
> in a company, where they want me to configure a linux centos server, that
> would send and receive sms messages through the siemens tc65 terminal
> siemens mc65 receiver. My first goal is to get the terminal to send a sms
> message. I connected the tc65 to the computer and used minicom to check,
> whether the tc65 responds to AT commands.
> Well, it responded, but there is also my problem; I do not know, how to
> translate that into a perl application. I thought that a module like
> GSM::SMS would help me, but without any knowledge about such things, I
> cannot do much at this point.
>=20
> Can you please help me?
>=20

Well, if you can do it manually using minicom, you can also probably do it =
in
Perl using a serial port module:

http://metacpan.org/release/Device-SerialPort

I'm not familiar with GSM::SMS and have never sent SMS messages using Perl,=
so
I cannot help you further, but it may provide a better interface than worki=
ng
with the serial port directly.

To properly learn Perl, see http://perl-begin.org/ .

Regards,

Shlomi Fish

> Matevž Markovič



--=20
------------------------------------------------------------ -----
Shlomi Fish http://www.shlomifish.org/
Freecell Solver - http://fc-solve.berlios.de/

sub id { my $self =3D shift; $json_parser_for{ $self }
->decode($json_for{ $self })->{id} } # Insideâ€=90out JSONâ€=90=
notated objects

Please reply to list if it's a mailing list post - http://shlom.in/reply .

--
To unsubscribe, e-mail: beginners-unsubscribe@perl.org
For additional commands, e-mail: beginners-help@perl.org
http://learn.perl.org/

Re: Using perl to send sms through siemens tc65

am 18.07.2011 20:56:34 von Rob Coops

--00163630ebe30de63f04a85c90c5
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: quoted-printable

On Mon, Jul 18, 2011 at 8:38 PM, Shlomi Fish wrote=
:

> Hi Matevž ,
>
> On Mon, 18 Jul 2011 15:21:09 +0200
> Matevž Markovič wrote:
>
> > Hy!
> >
> > First, I want to say hy to everyone! I am a fresh perl "programmer" (I
> > learned some things in the past few days), who is happy to get to know =
a
> new
> > language.
> > What is my problem? Actually, I did not know where to post this, so I a=
m
> > just posting on this group (because I am after all a perl beginner). I
> work
> > in a company, where they want me to configure a linux centos server, th=
at
> > would send and receive sms messages through the siemens tc65 terminal
> > siemens mc65 receiver. My first goal is to get the terminal to send a s=
ms
> > message. I connected the tc65 to the computer and used minicom to check=
,
> > whether the tc65 responds to AT commands.
> > Well, it responded, but there is also my problem; I do not know, how to
> > translate that into a perl application. I thought that a module like
> > GSM::SMS would help me, but without any knowledge about such things, I
> > cannot do much at this point.
> >
> > Can you please help me?
> >
>
> Well, if you can do it manually using minicom, you can also probably do i=
t
> in
> Perl using a serial port module:
>
> http://metacpan.org/release/Device-SerialPort
>
> I'm not familiar with GSM::SMS and have never sent SMS messages using Per=
l,
> so
> I cannot help you further, but it may provide a better interface than
> working
> with the serial port directly.
>
> To properly learn Perl, see http://perl-begin.org/ .
>
> Regards,
>
> Shlomi Fish
>
> > Matevž Markovič
>
>
>
> --
> ------------------------------------------------------------ -----
> Shlomi Fish http://www.shlomifish.org/
> Freecell Solver - http://fc-solve.berlios.de/
>
> sub id { my $self =3D shift; $json_parser_for{ $self }
> ->decode($json_for{ $self })->{id} } # Insideâ€=90out JSONâ€=
=90notated objects
>
> Please reply to list if it's a mailing list post - http://shlom.in/reply =
..
>
> --
> To unsubscribe, e-mail: beginners-unsubscribe@perl.org
> For additional commands, e-mail: beginners-help@perl.org
> http://learn.perl.org/
>
>
>
Having had a quick look at the GSM::SMS module the intor says: *Out of the
box, it comes with a serial transport*, and a bit later: *A good start is t=
o
read the docs for
GSM::SMS::NBS S.pm>
*

To me it looks like this module will do what you want but to be honest I
have no idea if it ill I have never used it. I would suggest having a look
at the example page. It looks quite straight forward from the examples I
have seen.

Still not much help I know but the good thing is that you have found your
way to CPAN and found a module that seems to do what you want it to do. Now
the only thing left to do is just giving it a try and see what it does. In
the worst case scenario you can always do as Shlomi suggested and have a go
at the serial port interface your self but using a purpose build module wil=
l
make your life a lot easier in most cases.

Regards,

Rob Coops

--00163630ebe30de63f04a85c90c5--

Re: Using perl to send sms through siemens tc65

am 19.07.2011 08:52:24 von ivwcorporation.matevz

--001485f87cf6e9016a04a8668eaa
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: quoted-printable

Dear Mr. Coops and Fish,

Thank you for your advices. I will first try the modules,, and if it does
not work, then I will take the "manual" way. Should be fun :).

Thank you,

Matevž

--001485f87cf6e9016a04a8668eaa--