diff options
Diffstat (limited to 'contrib/perl5/t/base/cond.t')
-rwxr-xr-x | contrib/perl5/t/base/cond.t | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/contrib/perl5/t/base/cond.t b/contrib/perl5/t/base/cond.t deleted file mode 100755 index 9a57348..0000000 --- a/contrib/perl5/t/base/cond.t +++ /dev/null @@ -1,19 +0,0 @@ -#!./perl - -# $RCSfile: cond.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:02 $ - -# make sure conditional operators work - -print "1..4\n"; - -$x = '0'; - -$x eq $x && (print "ok 1\n"); -$x ne $x && (print "not ok 1\n"); -$x eq $x || (print "not ok 2\n"); -$x ne $x || (print "ok 2\n"); - -$x == $x && (print "ok 3\n"); -$x != $x && (print "not ok 3\n"); -$x == $x || (print "not ok 4\n"); -$x != $x || (print "ok 4\n"); |