First of all, kick whoever provided that date in the unmentionables, and tell him or her to give you a four digit year.

Then, provided you really, really, don't want to use a CPAN module (which is your best option), then you use Zeller's algorithm. The source I gave has source in Pascal. You'll have to convert it to Perl yourself.