| Ralf S. Engelschall | 84107e6 | 1999-03-08 11:25:49 +0000 | [diff] [blame] | 1 | |
| 2 | BEGIN { | ||||
| 3 | $| = 1; | ||||
| 4 | print "1..1\n"; | ||||
| 5 | } | ||||
| 6 | END { | ||||
| 7 | print "not ok 1\n" unless $ok; | ||||
| 8 | } | ||||
| 9 | |||||
| 10 | use OpenSSL; | ||||
| 11 | my $bio = OpenSSL::BIO::new("mem") || die; | ||||
| 12 | undef $bio; | ||||
| 13 | |||||
| 14 | $ok = 1; | ||||
| 15 | print "ok 1\n"; | ||||
| 16 | |||||