Help for this page

Select Code to Download


  1. or download this
    open(Client,"+>/dev/ttyUSB0") || die "open: $!";
    use IO::Stty;
    ...
    IO::Stty::stty(\*Client,"19200");
    IO::Stty::stty(\*Client,"-echo");
    IO::Stty::stty(\*Client,"-icrnl");
    
  2. or download this
    IO::Stty::stty passed invalid parameter 'crtscts'
    Can't use string ("POSIX::B19200") as a subroutine ref while "strict r
    +efs" in use at /usr/share/perl5/IO/Stty.pm line 567.