Lines Matching full:should
24 # If things don't work as they should, then the file we've
26 # its own open should be unaffected).
29 is($@,"","autodying main::open should not leak to other files");
32 is($@,"","Other package open should be unaffected");
34 # The same should apply for rename (which is different, because
39 is($@,"","autodying main::rename should not leak to other files");
42 is($@,"","Other package rename should be unaffected");
44 # Dying rename in the other package should still die.
46 ok($@, "rename in loaded module should remain autodying.");
59 ok($@, "Failing-open string eval should throw an exception");
69 is("$@","","disabling autodie in string context should work");
86 ok($@,"Wacky flipping of autodie in string eval should work too!");
96 ok($@,"Wacky flipping of autodie in string eval should work too!");