Perl: Учитывая год и номер недели, как я могу получить первое свидание на этой неделе?

Используя превосходный модуль Perl DateTime , легко получить номер года и недели для даты, но пойти другим путем кажется немного сложным. труднее. Как получить дату, начинающуюся с номера года и недели?