Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Recent content by Riverdome
-
Need serial port access for very simple communication
Paul, It's actually isn't a modem but I don't think that will matter. Once the "black box" receives the T1 signal it does a function (in this case allows electricity to flow to port T1 thus turning on a light) If I send T0 or T2 it effect different devices within the home. All testing works... -
Need serial port access for very simple communication
#!/usr/bin/perl -w use strict; use Win32::SerialPort; sub openPort($); sub closePort($); my $DEVICE = "COM1"; my $serial = openPort ($DEVICE); $serial->write("T1"); closePort ($serial); sub openPort($) {my ($device) = @_; my $serial = Win32::SerialPort->new ($device, 1); die "Can't open serial... -
Need serial port access for very simple communication
Paul, Currently I'm only running MS Pers Web Server. This is a smaller home automation project so up 'til now it has been usable. I'm not tied to PWS and would make changes if I know those changes will help me reach my goal. -
Need serial port access for very simple communication
Thanks for the reply perluser, I can successfully achieve this through hyperterm but I guess I didn't elaborate enough in my first post. I need to be able to trigger this event via a button on my webpage, thus I turned to perl. Seemed so simple a month ago but I still don't have an answer. I... -
Need serial port access for very simple communication
I'm fairly new at Perl but have been fighting with SerialPort.pm and Commport.pm for too long now. All I need to do is send a very simple command out of the serial port into an electrical device. A batch file won't work for this project but if it would this is how it would read MODE COM1...
