NAME Device::WS2000::IO - Perl extension for reading data from the ELV Weatherstation WS2000 PC SYNOPSIS use Device::WS2000::IO qw (:all); $ok=open_ws("ttyS0"); send_ws($command,$parameter); @buffer = read_ws(); close_ws(); DESCRIPTION This module contains lowlevel-routines for the communication with the ELV Weatherstation WS2000 PC connected to a serial port. Following functions are implemented: open_ws ($port) opens the serial port and checks initial response, returns 1 on success, 0 on failure send_ws ($cmd,$par) send a command to the WS2000 Legal commands are: 0 read DCF-Time 1 read one datablock 2 next datablock 3 nine sensors 4 16 sensors 5 get status 6 uses parameter: set poll interval 1 - 60 minutes read_ws read response from WS2000 returns read buffer length is checked envelope is removed checksum is not yet checked (blame on me) close_ws closes the serial port EXPORT None by default. Tag :all open_ws close_ws send_ws read_ws SEE ALSO perl(1). Thanks My thanks go out to Friedrich Zabel for the C-Code used for the low-level functions, taken from his project wx2000 at http://wx2000.sourceforge.net/ To the opensource comunity in general which time and again show that sharing / modifying code and returning it to all users actualy works. AUTHOR Michael Böker Copyright Copyright (c) 2002 by Michael Böker. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.