Help for this page

Select Code to Download


  1. or download this
    my $list = 
"RcvChar
...
SerialOutputString";
while ($list =~ s/(\b\w+\b)(.*?)\s+\1\b/$1$2/s) {};
print $list;
  2. or download this
    RcvChar
checkeof
...
GetFile
ChksumByteByByte
GetChksum