perl的串口编程问题求助

perl的串口编程问题求助

perl的串口编程问题求助
在windows下使用perl,找来找去就每见一个能用的串口通信模块,已有的两个模块都不能用。这些模块好像都是使用win32API来着,为什么不直接使用perl的open或print来操作串口?perl把串口当文件使用时有问题吗?希望这方面有经验的大侠指点一下




   

把串口当文件用,这在 linu.
把串口当文件用,这在 linux/unix 上是这样的吧,在 win 上怎么行?
linux/unix 下串口模块:
[url=http://search.cpan.org/~cook/Device-SerialPort-1.002/SerialPort.pm] Device::SerialPort[/url]
[url=http://search.cpan.org/~andrewho/Sys-PortIO-0.1/PortIO.pm]Sys::PortIO[/url]

win 下:
[url=http://search.cpan.org/~bbirth/Win32-SerialPort-0.19/lib/Win32/SerialPort.pm] Win32::SerialPort [/url] ( 基于 Win32API::CommPort )

估计 win 下的这些模块的确现在不怎么好用了...没办法呵呵,win32够强的话只好你自己用 Win32::API 来满足要求了
谢谢楼上的。--我试过,.
谢谢楼上的。
我试过,可以用open函数打开串口
use strict;
open(FH,">>COM1") or die "Cant't create ";
print FH 'who';
select 1500;
print FH 'who';
select 1500;
print FH 'enable';
select 1500;
print FH 'zxr10';
select 1500;
print FH 'who';
select 2000;
while (<*>) {
print @_;
}
close(FH);
可惜没有任何反应。
把最后一个while循环改为死循环,用别的程序登录设备,提示串口被占用,这说明串口是打开了的。搞不懂!我用tcl写过类似的程序,使用的是一样的方法。
binmode FH 一下?.
binmode FH 一下?