On Mon, Jul 18, 2011 at 8:38 PM, Shlomi Fish <shlo...@shlomifish.org> wrote:
> Hi Matevž , > > On Mon, 18 Jul 2011 15:21:09 +0200 > Matevž Markovič <ivwcorporation.mat...@gmail.com> 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 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? > > > > 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 > 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/ > > <rjbs> sub id { my $self = shift; $json_parser_for{ $self } > ->decode($json_for{ $self })->{id} } # Inside‐out JSON‐notated objects > > Please reply to list if it's a mailing list post - http://shlom.in/reply . > > -- > To unsubscribe, e-mail: beginners-unsubscr...@perl.org > For additional commands, e-mail: beginners-h...@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 to read the docs for GSM::SMS::NBS<http://search.cpan.org/~johanvdb/GSM-SMS-0.162/lib/GSM/SMS/NBS.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 will make your life a lot easier in most cases. Regards, Rob Coops
