...meanwhile, here's a workaround - put this into your script

BEGIN {
    package Win32::SerialPort;

    sub FILENO {
        return fileno(CF) || -1;
    }
}
Thank you, but this code does'nt work.

See the manual page perltie. Win32::SerialPort uses tied filehandles,
and the method FILENO is missing.
Contact the author...

I saw what in Win32::SerialPort missing FILENO.
And then POE try use

vec($loop_vectors[$mode], $fileno, 1) = 1;
 $loop_filenos{$fileno} |= (1<<$mode);
}

with your FILENO

code does'nt return.
I think here need use emulation around IO::Handle but, i don't how. :)
Maybe sombody know?

Maybe use Wheel::Run?
But i can't see how.



Reply via email to