Lines Matching refs:status
27 #========== vmsish status ==========
29 is($?,0,"simple Perl invokation: POSIX success status");
31 use vmsish qw(status);
32 is(($? & 1),1, "importing vmsish [vmsish status]");
34 no vmsish qw(status); # check unimport function
38 is(($? & 1),1,"lex scope of vmsish [vmsish status]");
40 is($?,0,"outer lex scope of vmsish [POSIX status]");
44 is($?,0,"importing vmsish exit [POSIX status]");
49 use vmsish qw(status);
54 is($?&1,0,"vmsish status check, POSIX ERR exit");
59 is($?&1,1, "vmsish status check, vmsish OK exit");
64 is($?&1,0,"vmsish ERR exit, vmsish status check");