perlminator has asked for the wisdom of the Perl Monks concerning the following question:
it is working quiet well,$TTY = "/dev/ttyS0"; $STTY ="ignbrk -icrnl -ixon -opost -onlcr -isig -icanon -iexten parenb + -parodd cs8 -echo -echoe" ." -echok -echoctl -echoke min 0 time 5 1200"; `stty $STTY <$TTY`; open(IN,"$TTY") || die "\ncan not open Interface for reading $!\n"; open(OUT,">$TTY") || die "\ncan not open Interface for writeing $!\n"; $oldfh = select(OUT); $| = 1; select($oldfh); $| = 1;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: reading from serial device
by Zaxo (Archbishop) on Jun 15, 2004 at 07:22 UTC | |
|
Re: reading from serial device
by calin (Deacon) on Jun 14, 2004 at 17:50 UTC | |
by perlminator (Initiate) on Jun 15, 2004 at 06:47 UTC |