| 1 |
root |
1.1 |
print "1..9\n"; |
| 2 |
|
|
|
| 3 |
|
|
use String::CRC32C 'crc32c'; |
| 4 |
|
|
|
| 5 |
|
|
print "ok 1\n"; |
| 6 |
|
|
|
| 7 |
|
|
print 0x00000000 == (crc32c "") ? "" : "not ", "ok 2\n"; |
| 8 |
|
|
print 0x22620404 == (crc32c "The quick brown fox jumps over the lazy dog") ? "" : "not ", "ok 3\n"; |
| 9 |
|
|
print 0xe3069283 == (crc32c "123456789") ? "" : "not ", "ok 4\n"; |
| 10 |
|
|
print 0xe3069283 == (crc32c "56789", crc32c "1234") ? "" : "not ", "ok 5\n"; |
| 11 |
|
|
print 0xe3069283 == (crc32c "123456789", 0) ? "" : "not ", "ok 6\n"; |
| 12 |
|
|
print 0x8a9136aa == (crc32c "\x00" x 32) ? "" : "not ", "ok 7\n"; |
| 13 |
|
|
print 0x62a8ab43 == (crc32c "\xff" x 32) ? "" : "not ", "ok 8\n"; |
| 14 |
|
|
|
| 15 |
|
|
print "ok 9\n"; |
