diff options
Diffstat (limited to 't/op.crypt')
| -rw-r--r-- | t/op.crypt | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/t/op.crypt b/t/op.crypt deleted file mode 100644 index b28dda6aaa..0000000000 --- a/t/op.crypt +++ /dev/null @@ -1,12 +0,0 @@ -#!./perl - -# $Header: op.crypt,v 1.0 87/12/18 13:13:17 root Exp $ - -print "1..2\n"; - -# this evaluates entirely at compile time! -if (crypt('uh','oh') eq 'ohPnjpYtoi1NU') {print "ok 1\n";} else {print "not ok 1\n";} - -# this doesn't. -$uh = 'uh'; -if (crypt($uh,'oh') eq 'ohPnjpYtoi1NU') {print "ok 2\n";} else {print "not ok 2\n";} |