Lines Matching refs:RIGHT
65 eval {socketpair LEFT, RIGHT, -1, -1, -1};
82 ok (socketpair (LEFT, RIGHT, AF_UNIX, SOCK_STREAM, PF_UNSPEC),
83 "socketpair (LEFT, RIGHT, AF_UNIX, SOCK_STREAM, PF_UNSPEC)")
88 binmode(RIGHT, ":bytes");
99 # is (syswrite (RIGHT, $_), length $_, "write " . _qq ($_) . " to right");
100 is (syswrite (RIGHT, $_), length $_, "syswrite to right");
111 is (read (RIGHT, $buffer, length $expect), length $expect, "read on right");
124 ok (eof RIGHT, "right is at EOF");
154 is (syswrite (RIGHT, $_), length $_, "syswrite to right");
165 ok (close RIGHT, "close right");
176 ok (socketpair (LEFT, RIGHT, AF_UNIX, SOCK_DGRAM, PF_UNSPEC),
177 "socketpair (LEFT, RIGHT, AF_UNIX, SOCK_DGRAM, PF_UNSPEC)")
182 binmode(RIGHT, ":bytes");
190 # is (syswrite (RIGHT, $_), length $_, "write " . _qq ($_) . " to right");
191 is (syswrite (RIGHT, $_), length $_, "syswrite to right");
205 is (sysread (RIGHT, $buffer, length $total), length $expect, "read on right");
222 is (sysread (RIGHT, $buffer, 1), undef,
229 #ok (eof RIGHT, "right is at EOF");
232 is (syswrite (RIGHT, $_), length $_, "syswrite to right");
243 ok (close RIGHT, "close right");