use maketime. Perl has Cs maketime library built-in which is very good for dealing with dates. Do a search on maketime for examples.