My DES perl script

Hi all, it is my first post here. I hope its a nice start ;)
Here is my perl script that is a full DES encrypter/decrypter. I worked on it for 4 days, so i hope you guess how I felt when it didnt work and i started to debug and fix every corner of it for 3 more days. Now its ready, and it works. I still need checkers so, if you want to help me with this do it, and contact me [email protected] or
[email protected]. Feedback and comments are appreciated. No doumentation is necessary i guess, but will write one if i have spare time in my hands. Enjoy.

http://www.freewebs.com/okidan/index.htm

There you can find my other scripts as well.