Найти часовой пояс по коду аэропорта с помощью кода Perl

Поскольку я сейчас работаю над блокировкой отображения конкретного рейса, если время вылета находится в пределах 3 часов времени бронирования. Мне нужно получить часовой пояс вылетающего аэропорта, чтобы преобразовать его в GMT и, таким образом, получить правильную разницу между временем бронирования и временем вылета рейса. Я искал много модулей CPAN для сопоставления кода аэропорта и часового пояса, но я не нашел подходящего решения. Было бы здорово, если бы кто-нибудь помог мне найти хорошее решение для этого.