Lines Matching refs:ok
15 ok( binmode(STDERR), 'STDERR made binary' );
17 ok( binmode(STDERR, ":unix"), ' with unix discipline' );
19 ok(1, ' skip unix discipline without PerlIO layers' );
21 ok( binmode(STDERR, ":raw"), ' raw' );
22 ok( binmode(STDERR, ":crlf"), ' and crlf' );
25 ok( binmode(STDOUT), 'STDOUT made binary' ) || exit(1);
27 ok( binmode(STDOUT, ":unix"), ' with unix discipline' );
29 ok(1, ' skip unix discipline without PerlIO layers' );
31 ok( binmode(STDOUT, ":raw"), ' raw' );
32 ok( binmode(STDOUT, ":crlf"), ' and crlf' );
41 ok($! == &Errno::EBADF);