### https://theweeklychallenge.org/blog/perl-weekly-challenge-347/
"""

Task 1: Format Date

Submitted by: [44]Mohammad Sajid Anwar
     __________________________________________________________________

   You are given a date in the form: 10th Nov 2025.

   Write a script to format the given date in the form: 2025-11-10 using
   the set below.
@DAYS   = ("1st", "2nd", "3rd", ....., "30th", "31st")
@MONTHS = ("Jan", "Feb", "Mar", ....., "Nov",  "Dec")
@YEARS  = (1900..2100)

Example 1

Input: $str = "1st Jan 2025"
Output: "2025-01-01"

Example 2

Input: $str = "22nd Feb 2025"
Output: "2025-02-22"

Example 3

Input: $str = "15th Apr 2025"
Output: "2025-04-15"

Example 4

Input: $str = "23rd Oct 2025"
Output: "2025-10-23"

Example 5

Input: $str = "31st Dec 2025"
Output: "2025-12-31"

Task 2: Format Phone Number
"""
### solution by pokgopun@gmail.com


MONTHS = ("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec")

def fd(string: str) -> str:
    d = string.split(" ")
    return "{}-{:02d}-{:02d}".format(d[2], MONTHS.index(d[1])+1, int(d[0][:-2]))

import unittest

class TestFd(unittest.TestCase):
    def test(self):
        for inpt, otpt in {
                "1st Jan 2025": "2025-01-01",
                "22nd Feb 2025": "2025-02-22",
                "15th Apr 2025": "2025-04-15",
                "23rd Oct 2025": "2025-10-23",
                "31st Dec 2025": "2025-12-31",
                }.items():
            self.assertEqual(fd(inpt), otpt)

unittest.main()