Communications question

Benjamin Holzman bholzman at earthlink.net
Fri Jul 9 14:34:49 CDT 1999


On Fri, Jul 09, 1999 at 02:43:28PM -0400, Chastain, Jack (Jack)** CTR ** wrote:
> Greetings, all
> 
> A friend of mine is doing some serial communications control - something I
 [ ... ]
> underlying network system. There apparently is no indications in the fnctl
> module for a BREAK sequence.
> 
I believe that what you are looking for is what the POSIX function tcsendbreak()
does, which is available in perl as follows:

	use POSIX qw/tcsendbreak/;

	tcsendbreak(fileno(FILEHANDLE), $duration);

you should check your local man pages on tcsendbreak to understand $duration
exactly.

Ben
-- 
sub v ($){ $_ ? uc shift : $_[0] } sub erse { /../ && return 'a'..'z';'A'..'Z'}
$_='CEVAG ERIREFR RINY ERIREFR D.uNPXRE, cREY, nABGURE, wHFG} _$ RFERIRE ENYNPF
{CNZ ,"$ AVBW.';s'.'$_{"\x35"}'geee;eval;BEGIN{for(0,32){@{chr(64|$_)}{v n..v z
,v a..v 'm'}=erse()}@_{53,3..5}=('$`{$&}||$@{$&}||$&',map '$_{'.$_.'}',51..53)}



More information about the Albany-pm mailing list