Select Code to Download

Select or download this

----------------------------------------------------
Serial.pm
...

1;
---------------------------------------------------------------

Select or download this

---------------------------------------------------------------
# ####################################################################
+####
...
print "Response is; $response\n";
print "Response num char; ".length($response)."\n";
------------------------------------------------------------------

Select or download this

------------------------------------------------------------------
Console output for a simple test;
...
Response num char; 21
    (in cleanup) Can't call method "Call" on an undefined value at C:/
+Strawberry/perl/vendor/lib/Win32API/CommPort.pm line 193 during globa
+l destruction.
----------------------------------------------------------