The time passed into time2str is supposed to be the number of seconds since 01.01.1970 ("epoch"), and not a string describing a year+month+date. So you'll have to first parse the date into its year,month,day parts, and then possibly use Time::Local to find the epoch time corresponding to that time.