$PortObj->handshake("xoff");  
$PortObj->xon_limit(100);     # bytes left in buffer
$PortObj->xoff_limit(100);    # space left in buffer
$PortObj->xon_char(0x11);
$PortObj->xoff_char(0x13);