Win32::SerialPort and Win32API::CommPort VERSION=0.22, 10 June 2010 (eg/elec_meter.pl and test improvements) Hello Serial Port users: If you are not running Windows, you want the Device::SerialPort module instead of this one. It has a compatible user interface and runs on Operating Systems that fully support POSIX.pm. Available from your favorite CPAN site. Since someone asked, MS-DOS does NOT support POSIX.pm. But OSX does. It has been over 10 years since the last major release. No functions are considered "experimental" anymore. There is now a module Test::Device::SerialPort on CPAN that emulates these modules (and their POSIX cousins) for testing application code without hardware. While the modules themselves have supported USB ports, COM10 and above, VirtualBox, and embedded ports, the tests did not up to now. These modules are intended for Win32 ports of Perl without requiring a compiler or using XS. In every case, compatibility has been selected over performance. Since everything is (convoluted but still pure) perl, you can fix flaws and change limits if required. But please file a bug report if you do. I have tested with the ActiveState (5.6.x, 5.8.x, 5.10.x) and Strawberry (5.8.x and 5.10.x) distributions. But these modules should work on any Win32 version that supports Aldo Calpini's Win32::API. While the modules have worked on earlier perl versions, I no longer have any way to test them for compatibility. All planned features are now implemented. If you see any place where the code does not match the documentation, consider it a bug and please report it. FILES: Changes - for history lovers Makefile.PL - the "starting point" for traditional reasons MANIFEST - file list README.txt - this file (CRLF) README - same file with CPAN-friendly name (LF only) eg/any_os.plx - cross-platform use and init eg/demo1.plx - talks to a "really dumb" terminal eg/demo2.plx - "poor man's" readline and chat eg/demo3.plx - looks like a setup menu - but only looks :-( eg/demo4.plx - simplest setup: "new", "required param", "restart" eg/demo5.plx - "waitfor" and "nextline" using lookfor eg/demo6.plx - basic tied FileHandle operations, record separators eg/demo7.plx - a Perl/Tk based terminal, event loop and callbacks eg/demo8.plx - command line terminal emulator with Term::Readkey eg/demo9.plx - using debug on a close() eg/elec_meter.pl - (new) synchronizing with a continuous stream eg/options.plx - post-install test that prints available options eg/stty.plx - first try at Unix lookalike lib - install directory lib/Win32 - install directory lib/Win32/SerialPort.pm - the reason you're reading this lib/Win32API - install directory lib/Win32API/CommPort.pm - the raw API calls and other internals html - install directory html/Win32 - install directory html/Win32/SerialPort.html - documentation html/Win32API - install directory html/Win32API/CommPort.html - documentation t - test directory t/Altport.pm - stub for inheritance test t/test1.t - RUN ME FIRST, tests and creates configuration t/test2.t - tests restarting_a_configuration and timeouts t/test3.t - Inheritance and export version of test1.t t/test4.t - Inheritance version of test2.t and "restart" t/test5.t - tests to optional exports from CommPort t/test6.t - stty tests t/test7.t - tied FileHandle tests PRE-INSTALL and TEST: Run 'perl Makefile.PL' first with nothing connected to "COM1". You can specify a diferent port to test with 'perl Makefile.PL TESTPORT=PORT'. I recommend you use a "traditional" hard-wired port for testing if available. Several tests are skipped for USB and other specialized ports. For those with make (e.g. Strawberry Perl), the normal mantra applies: perl Makefile.PL TESTPORT=port make make test make install Makefile.PL also generates two scripts for those who don't have a version of 'make' (e.g. nmake, dmake): perl nomake_test perl nomake_install Test::More and related routines are used to generate reports. The test suite covers most of the module methods and leaves the port set for 9600 baud, 1 stop, 8 data, no parity, no handshaking, and other defaults. At various points in the testing, it expects unconnected CTS and DTR lines. The final configuration is saved by test1.t as port_test.cfg in the current directory (e.g COM1_test.cfg). The pod2html output is stored in the html directory. Some perl versions support automatically installing html and others do not. Tests may also be run individually by typing: 'perl test?.t [COMx]' All tests are expected to pass - I would be very interested in hearing about failures ("not ok"). These tests should be run from a command line (DOS box). DEMO PROGRAMS: Connect a dumb terminal (or a PC that acts like one) to COM1 and setup the equivalent configuration. Starting demo1.plx should print a three line message on both the terminal and the Win32 command line. The terminal keyboard (only) now accepts characters which it prints to both screens until a CONTROL-Z is typed. Also included is demo2.plx - a truly minimal chat program. Bi-directional communication without an event loop, sockets, pipes (or much utility ;-) This one uses CAPITAL-Q from the active keyboard to quit since <STDIN> doesn't like CONTROL-Z. And each command shell acts a little differently (Cygnus "bash", COMMAND.COM). Try running the terminal at 4800 baud to get errors (or 300 to get "breaks"). AltPort.pm and test3.t implement the "basic Inheritance test" discussed in perltoot and other documentation. It also imports the :STAT constants. It's otherwise only slightly modified from test1.t (you'll get a different "alias" if you run test2.t or demo3.plx after test3.t). There are some subtle functional changes between test2.t and test4.t. But test4.t also calls CommPort methods directly rather than through SerialPort and adds tests for lookfor and stty_xxx methods. You can read (many of the important) settings with demo3.plx. If you give it a (valid) configuration file on the command line, it will open the port with those parameters (and "initialized" set - so you can test simple changes: see the parity example at the end of demo3.plx). Run options.plx to see the available choices for various parameters along with the current values. If you have trouble, I will probably ask you to save the output of options.plx in a file and send it to me. You can specify a port name for options.plx on the command line (e.g. 'perl options.plx COM2'). Demo4.plx is a "minimum" script showing just the basics needed to get started. Demo5.plx demonstrates various uses of the lookfor routine including setups for "waitfor" and a primitive "readline". Try them out. The default "stty" settings work with a VT-100 style terminal. You may have to set the options by hand. Use any editor. Let me know if the descriptions in the documentation are useable. And if any more options are necessary. Demo6.plx demonstrates tied FileHandles. Perl 5.005 is recommended. It "requires" 5.004. It implements timeouts on all user inputs - so you can run it "hands-off" to see what happens. Demo7.plx uses Tk to create a terminal emulator. Its included to show polling and callbacks using an event loop. Demo8.plx is a simple command-line terminal emulator contributed by Andrej Mikus. Elec_meter.pl is user-supplied code to monitor a read-only data stream produced by a household electric meter (in France). Stty.plx is a wrapper around the stty method that implements a clone of the Unix/POSIX function of the same name. It's line noise unless you know Unix. The Perl Journal #13 included an article on Controlling a Modem with Win32::SerialPort. Perl Journal #16 showed how to work with the X10 series of home automation modules (ControlX10::). Please tell me what does and what doesn't work. The module has proven to be pretty robust. But I can't test all possible configurations. Don't trust it for anything important without complete testing. Available on CPAN under Author BBIRTH or on gitHub: http://github.com/wbirthisel/win32-serialport Thanks, -bill Copyright (C) 2010, Bill Birthisel. All rights reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.