$mo = POSIX::Termios->new;  

$mo->setiflag(0 | IXON | IXOFF);        
$mo->setoflag(0);
$mo->setlflag(0);
$mo->setcc(VMIN, 3);                             # N3; = 3 Zeichen
$mo->setcc(VTIME, 0);
$mo->setcflag(CREAD | CS8 | B9600);
$mo->setattr(fileno(Serial), TCSANOW);