Напоминалка дня рождения сотрудника

Нужно было сделать напоминалку о днях рождения сотрудников предприятия.
Вот что из этого получилось.
Это второй мой скрипт на perl, просьба сильно не пинать.

Данные в файле birthday.txt должны быть в виде:

6.6.1970 Иванов А.Ю.
05.07.1975 Петров Ю.А.

Ведущие нули в дне и месяце рождения не учитываются.