Здравствуйте.
Необходимо разработать скрипт на языке Perl по поиску цен на авиабилеты, используя заданный API.
API:
Пример запроса:
Пример ответа:
Бесплатный лимит запросов на один аккаунт – 50 в день, так что будьте внимательны при тестировании!
Формат входных данных – YAML файл со следующей структурой:
departure:
date: '20-09-2015' # дата отправления
airport: MOW # аэропорт отправления
adults: 2 # количество взрослых
children: 0 # количество детей
arrival:
date: '30-09-2015' # дата возвращения
airport:
- SJD # аэропорт прибытия 1
- GCM # аэропорт прибытия 2
- BZE # аэропорт прибытия 3
- PUJ # аэропорт прибытия 4
Формат выходных данных – один CSV файл с лучшими ценами по каждому направлению (для примера выше в CSV файле
будет 4 строчки для направлений MOW-SJD-MOW, MOW-GCM-MOW, MOW-BZE-MOW, MOW-PUJ-MOW). CSV файл должен иметь
следующие столбцы (на английском):
- Departure airport (аэропорт отправления)
- Arrival airport (аэропорт прибытия)
- Departure Date &Time (дата и время отправления)
- Travel Time (время в пути туда)
- Legs (количество сегментов туда)
- Return Date &Time (дата и время прибытия)
- Travel Time (время в пути обратно)
- Legs (количество сегментов обратно)
- Lowest Price USD (наименьшая saleTotal цена в USD)
Строчки в CSV файле должны быть отсортированы по последнему столбику в возрастающем порядке.
Просьба предоставить Perl скрипт с минимальным набором комментариев (желательно, на английском).
На данный момент интересуют сроки и стоимость.