--- IO-AIO/t/01_stat.t 2005/07/10 17:07:44 1.1 +++ IO-AIO/t/01_stat.t 2005/07/10 18:16:49 1.2 @@ -22,7 +22,8 @@ } aio_open "/etc/passwd", O_RDONLY, 0, sub { - print $_[0] >= 0 ? "ok" : "not ok", " 1\n"; + print $_[0] ? "ok" : "not ok", " 1\n"; + $pwd = $_[0]; }; @@ -50,7 +51,7 @@ pcb; -print open (PWD, "<&$pwd") ? "ok" : "not ok", " 7\n"; +print open (PWD, "<&" . fileno $pwd) ? "ok" : "not ok", " 7\n"; aio_stat *PWD, sub { print -f _ ? "ok" : "not ok", " 8\n";