PERL script for retrieving store business hours from a website (JSON)

A website is publishing the business hours but they don't do it the same way for every store. They are VERY inconsistent... Some stores will have their hours listed day-by-day (Mon, Tue, Wed, ... Sun) while other will be listed by group of days (Mon, Tue - Thu, Fri, Sat - Sun) or any crazy combination of these. Can even be listed as Mon - Tue, Wed - Thu, Fri - Sat, Sun. Any bad/nightmarish combination you can think the would publish. I only need to get the information for ONE store at a time, not to do it for dozens at a time. When I need the store hours for one store, I will run the script, get the info and die. I need to get the store hours for "today" and "tomorrow", store it in 4 separate variables: $today_open $today_close_hour $tomorrow_open $tomorrow_close (hour should have leading 0 for the hour - so 00 to 09) So, if today is Monday, I need to dig the JSON and get the store hours for today (Monday) and tomorrow (Tuesday). If today is Sunday, I need the hours for today (Sunday) and tomorrow (Monday). If you can't find the hours for a particular day, it means that the store is closed (there is no info published for that day if the store is closed). Website information is published in JSON. Requirements: code MUST be written in PERL Check attached document for some examples.