Hi all,

I've got a perl script that takes text input from our switchboard and feeds a 
call logging database.

Currently, I have a BASH script that calls kermit to control the serial port 
and pipe the output to my perl script (shown below).  However, this causes 
admin problems - especially the kermit process - when having to restart etc.

What's the best way to do the whole process in my perl script?
I will need to lock the port (create lock file LCK..ttyS0) - no problem.
I will then need to configure the port settings and then open the port for 
input so that I can read from it.

__cmsrun__
#!/bin/bash
#cmsrun - starts the call logging process
cd /home/cms/data

cat cms.log >>cms.full
cat /dev/null >cms.log
#kermit cms.script >cms.out 2>&1
kermit /home/cms/bin/cms.script 2>&1|/home/cms/bin/cmsctrl Donc 2>cms.err 
>cms.out
__END__

__cms.script__
set port /dev/ttyS0
set speed 9600
set carrier-watch off
set parity none
set flow-control xon/xoff
log session cms.log
c
__END__

-- 
Gary Stainburn
 
This email does not contain private or confidential material as it
may be snooped on by interested government parties for unknown
and undisclosed purposes - Regulation of Investigatory Powers Act, 2000     


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to