7.20 非ブロックモードで入出力を行う。

• sysopenでファイルをオープンする。

use Fncl;
sysopen(MODEM, "/day/cua0, O_NONBLOCK|O_RDRW
  or die "Cannot" open model: $!\n);