#!/usr/bin/perl
use strict;
use warnings;
use 5.010;

my $jahreszeiten = sub { my ($r)=@_;%$r=('1700'=>[20,21,23,21],'1701'=>[20,21,23,22],'1702'=>[21,22,23,22],'1703'=>[21,22,23,22],'1704'=>[20,21,23,21],'1705'=>[20,21,23,21],'1706'=>[21,22,23,22],'1707'=>[21,22,23,22],'1708'=>[20,21,23,21],'1709'=>[20,21,23,21],'1710'=>[21,22,23,22],'1711'=>[21,22,23,22],'1712'=>[20,21,23,21],'1713'=>[20,21,23,21],'1714'=>[21,21,23,22],'1715'=>[21,22,23,22],'1716'=>[20,21,23,21],'1717'=>[20,21,23,21],'1718'=>[21,21,23,22],'1719'=>[21,22,23,22],'1720'=>[20,21,22,21],'1721'=>[20,21,23,21],'1722'=>[20,21,23,22],'1723'=>[21,22,23,22],'1724'=>[20,21,22,21],'1725'=>[20,21,23,21],'1726'=>[20,21,23,22],'1727'=>[21,22,23,22],'1728'=>[20,21,22,21],'1729'=>[20,21,23,21],'1730'=>[20,21,23,22],'1731'=>[21,22,23,22],'1732'=>[20,21,22,21],'1733'=>[20,21,23,21],'1734'=>[20,21,23,22],'1735'=>[21,22,23,22],'1736'=>[20,21,22,21],'1737'=>[20,21,23,21],'1738'=>[20,21,23,21],'1739'=>[21,22,23,22],'1740'=>[20,21,22,21],'1741'=>[20,21,23,21],'1742'=>[20,21,23,21],'1743'=>[21,22,23,22],'1744'=>[20,21,22,21],'1745'=>[20,21,23,21],'1746'=>[20,21,23,21],'1747'=>[21,21,23,22],'1748'=>[20,21,22,21],'1749'=>[20,21,22,21],'1750'=>[20,21,23,21],'1751'=>[21,21,23,22],'1752'=>[20,21,22,21],'1753'=>[20,21,22,21],'1754'=>[20,21,23,21],'1755'=>[20,21,23,22],'1756'=>[20,21,22,21],'1757'=>[20,21,22,21],'1758'=>[20,21,23,21],'1759'=>[20,21,23,22],'1760'=>[20,21,22,21],'1761'=>[20,21,22,21],'1762'=>[20,21,23,21],'1763'=>[20,21,23,22],'1764'=>[20,21,22,21],'1765'=>[20,21,22,21],'1766'=>[20,21,23,21],'1767'=>[20,21,23,22],'1768'=>[20,21,22,21],'1769'=>[20,21,22,21],'1770'=>[20,21,23,21],'1771'=>[20,21,23,22],'1772'=>[20,21,22,21],'1773'=>[20,21,22,21],'1774'=>[20,21,23,21],'1775'=>[20,21,23,21],'1776'=>[20,20,22,21],'1777'=>[20,21,22,21],'1778'=>[20,21,23,21],'1779'=>[20,21,23,21],'1780'=>[20,20,22,21],'1781'=>[20,21,22,21],'1782'=>[20,21,22,21],'1783'=>[20,21,23,21],'1784'=>[19,20,22,21],'1785'=>[20,21,22,21],'1786'=>[20,21,22,21],'1787'=>[20,21,23,21],'1788'=>[19,20,22,21],'1789'=>[20,21,22,21],'1790'=>[20,21,22,21],'1791'=>[20,21,23,21],'1792'=>[19,20,22,21],'1793'=>[20,21,22,21],'1794'=>[20,21,22,21],'1795'=>[20,21,23,21],'1796'=>[19,20,22,21],'1797'=>[20,21,22,21],'1798'=>[20,21,22,21],'1799'=>[20,21,23,21],'1800'=>[20,21,23,22],'1801'=>[21,22,23,22],'1802'=>[21,22,23,22],'1803'=>[21,22,24,22],'1804'=>[20,21,23,22],'1805'=>[21,21,23,22],'1806'=>[21,22,23,22],'1807'=>[21,22,24,22],'1808'=>[20,21,23,21],'1809'=>[21,21,23,22],'1810'=>[21,22,23,22],'1811'=>[21,22,24,22],'1812'=>[20,21,23,21],'1813'=>[21,21,23,22],'1814'=>[21,22,23,22],'1815'=>[21,22,23,22],'1816'=>[20,21,23,21],'1817'=>[20,21,23,22],'1818'=>[21,22,23,22],'1819'=>[21,22,23,22],'1820'=>[20,21,23,21],'1821'=>[20,21,23,22],'1822'=>[21,22,23,22],'1823'=>[21,22,23,22],'1824'=>[20,21,23,21],'1825'=>[20,21,23,22],'1826'=>[21,22,23,22],'1827'=>[21,22,23,22],'1828'=>[20,21,23,21],'1829'=>[20,21,23,22],'1830'=>[21,22,23,22],'1831'=>[21,22,23,22],'1832'=>[20,21,23,21],'1833'=>[20,21,23,22],'1834'=>[21,22,23,22],'1835'=>[21,22,23,22],'1836'=>[20,21,23,21],'1837'=>[20,21,23,22],'1838'=>[21,21,23,22],'1839'=>[21,22,23,22],'1840'=>[20,21,23,21],'1841'=>[20,21,23,21],'1842'=>[21,21,23,22],'1843'=>[21,22,23,22],'1844'=>[20,21,22,21],'1845'=>[20,21,23,21],'1846'=>[21,21,23,22],'1847'=>[21,22,23,22],'1848'=>[20,21,22,21],'1849'=>[20,21,23,21],'1850'=>[20,21,23,22],'1851'=>[21,22,23,22],'1852'=>[20,21,22,21],'1853'=>[20,21,23,21],'1854'=>[20,21,23,22],'1855'=>[21,22,23,22],'1856'=>[20,21,22,21],'1857'=>[20,21,23,21],'1858'=>[20,21,23,22],'1859'=>[21,22,23,22],'1860'=>[20,21,22,21],'1861'=>[20,21,23,21],'1862'=>[20,21,23,22],'1863'=>[21,21,23,22],'1864'=>[20,21,22,21],'1865'=>[20,21,23,21],'1866'=>[20,21,23,22],'1867'=>[21,21,23,22],'1868'=>[20,21,22,21],'1869'=>[20,21,23,21],'1870'=>[20,21,23,22],'1871'=>[21,21,23,22],'1872'=>[20,21,22,21],'1873'=>[20,21,23,21],'1874'=>[20,21,23,22],'1875'=>[21,21,23,22],'1876'=>[20,21,22,21],'1877'=>[20,21,22,21],'1878'=>[20,21,23,21],'1879'=>[21,21,23,22],'1880'=>[20,21,22,21],'1881'=>[20,21,22,21],'1882'=>[20,21,23,21],'1883'=>[20,21,23,22],'1884'=>[20,21,22,21],'1885'=>[20,21,22,21],'1886'=>[20,21,23,21],'1887'=>[20,21,23,22],'1888'=>[20,21,22,21],'1889'=>[20,21,22,21],'1890'=>[20,21,23,21],'1891'=>[20,21,23,22],'1892'=>[20,21,22,21],'1893'=>[20,21,22,21],'1894'=>[20,21,23,21],'1895'=>[20,21,23,22],'1896'=>[20,20,22,21],'1897'=>[20,21,22,21],'1898'=>[20,21,23,21],'1899'=>[20,21,23,22],'1900'=>[21,21,23,22],'1901'=>[21,22,23,22],'1902'=>[21,22,24,22],'1903'=>[21,22,24,23],'1904'=>[21,21,23,22],'1905'=>[21,22,23,22],'1906'=>[21,22,24,22],'1907'=>[21,22,24,23],'1908'=>[21,21,23,22],'1909'=>[21,22,23,22],'1910'=>[21,22,23,22],'1911'=>[21,22,24,22],'1912'=>[21,21,23,22],'1913'=>[21,22,23,22],'1914'=>[21,22,23,22],'1915'=>[21,22,24,22],'1916'=>[20,21,23,22],'1917'=>[21,22,23,22],'1918'=>[21,22,23,22],'1919'=>[21,22,24,22],'1920'=>[20,21,23,22],'1921'=>[21,22,23,22],'1922'=>[21,22,23,22],'1923'=>[21,22,24,22],'1924'=>[20,21,23,22],'1925'=>[21,21,23,22],'1926'=>[21,22,23,22],'1927'=>[21,22,24,22],'1928'=>[20,21,23,22],'1929'=>[21,21,23,22],'1930'=>[21,22,23,22],'1931'=>[21,22,24,22],'1932'=>[20,21,23,22],'1933'=>[21,21,23,22],'1934'=>[21,22,23,22],'1935'=>[21,22,24,22],'1936'=>[20,21,23,22],'1937'=>[21,21,23,22],'1938'=>[21,22,23,22],'1939'=>[21,22,23,22],'1940'=>[20,21,23,22],'1941'=>[21,21,23,22],'1942'=>[21,22,23,22],'1943'=>[21,22,24,22],'1944'=>[20,21,23,22],'1945'=>[21,21,23,22],'1946'=>[21,22,23,22],'1947'=>[21,22,23,22],'1948'=>[20,21,23,21],'1949'=>[20,21,23,22],'1950'=>[21,22,23,22],'1951'=>[21,22,23,22],'1952'=>[20,21,23,21],'1953'=>[20,21,23,22],'1954'=>[21,21,23,22],'1955'=>[21,22,23,22],'1956'=>[20,21,23,21],'1957'=>[20,21,23,22],'1958'=>[21,21,23,22],'1959'=>[21,22,23,22],'1960'=>[20,21,23,21],'1961'=>[20,21,23,22],'1962'=>[21,21,23,22],'1963'=>[21,22,23,22],'1964'=>[20,21,23,21],'1965'=>[20,21,23,22],'1966'=>[21,21,23,22],'1967'=>[21,22,23,22],'1968'=>[20,21,23,21],'1969'=>[20,21,23,22],'1970'=>[21,21,23,22],'1971'=>[21,22,23,22],'1972'=>[20,21,22,21],'1973'=>[20,21,23,22],'1974'=>[21,21,23,22],'1975'=>[21,22,23,22],'1976'=>[20,21,22,21],'1977'=>[20,21,23,22],'1978'=>[21,21,23,22],'1979'=>[21,22,23,22],'1980'=>[20,21,22,21],'1981'=>[20,21,23,21],'1982'=>[20,21,23,22],'1983'=>[21,22,23,22],'1984'=>[20,21,22,21],'1985'=>[20,21,23,21],'1986'=>[20,21,23,22],'1987'=>[21,22,23,22],'1988'=>[20,21,22,21],'1989'=>[20,21,23,21],'1990'=>[20,21,23,22],'1991'=>[21,21,23,22],'1992'=>[20,21,22,21],'1993'=>[20,21,23,21],'1994'=>[20,21,23,22],'1995'=>[21,21,23,22],'1996'=>[20,21,22,21],'1997'=>[20,21,23,21],'1998'=>[20,21,23,22],'1999'=>[21,21,23,22],'2000'=>[20,21,22,21],'2001'=>[20,21,23,21],'2002'=>[20,21,23,22],'2003'=>[21,21,23,22],'2004'=>[20,21,22,21],'2005'=>[20,21,23,21],'2006'=>[20,21,23,22],'2007'=>[21,21,23,22],'2008'=>[20,21,22,21],'2009'=>[20,21,22,21],'2010'=>[20,21,23,22],'2011'=>[21,21,23,22],'2012'=>[20,21,22,21],'2013'=>[20,21,22,21],'2014'=>[20,21,23,22],'2015'=>[20,21,23,22],'2016'=>[20,21,22,21],'2017'=>[20,21,22,21],'2018'=>[20,21,23,21],'2019'=>[20,21,23,22],'2020'=>[20,20,22,21],'2021'=>[20,21,22,21],'2022'=>[20,21,23,21],'2023'=>[20,21,23,22],'2024'=>[20,20,22,21],'2025'=>[20,21,22,21],'2026'=>[20,21,23,21],'2027'=>[20,21,23,22],'2028'=>[20,20,22,21],'2029'=>[20,21,22,21],'2030'=>[20,21,23,21],'2031'=>[20,21,23,22],'2032'=>[20,20,22,21],'2033'=>[20,21,22,21],'2034'=>[20,21,23,21],'2035'=>[20,21,23,22],'2036'=>[20,20,22,21],'2037'=>[20,21,22,21],'2038'=>[20,21,23,21],'2039'=>[20,21,23,22],'2040'=>[20,20,22,21],'2041'=>[20,21,22,21],'2042'=>[20,21,22,21],'2043'=>[20,21,23,22],'2044'=>[20,20,22,21],'2045'=>[20,21,22,21],'2046'=>[20,21,22,21],'2047'=>[20,21,23,22],'2048'=>[19,20,22,21],'2049'=>[20,20,22,21],'2050'=>[20,21,22,21],'2051'=>[20,21,23,21],'2052'=>[19,20,22,21],'2053'=>[20,20,22,21],'2054'=>[20,21,22,21],'2055'=>[20,21,23,21],'2056'=>[19,20,22,21],'2057'=>[20,20,22,21],'2058'=>[20,21,22,21],'2059'=>[20,21,23,21],'2060'=>[19,20,22,21],'2061'=>[20,20,22,21],'2062'=>[20,21,22,21],'2063'=>[20,21,23,21],'2064'=>[19,20,22,21],'2065'=>[20,20,22,21],'2066'=>[20,21,22,21],'2067'=>[20,21,23,21],'2068'=>[19,20,22,21],'2069'=>[20,20,22,21],'2070'=>[20,21,22,21],'2071'=>[20,21,22,21],'2072'=>[19,20,22,21],'2073'=>[20,20,22,21],'2074'=>[20,21,22,21],'2075'=>[20,21,22,21],'2076'=>[19,20,22,21],'2077'=>[20,20,22,21],'2078'=>[20,20,22,21],'2079'=>[20,21,22,21],'2080'=>[19,20,22,21],'2081'=>[19,20,22,21],'2082'=>[20,20,22,21],'2083'=>[20,21,22,21],'2084'=>[19,20,22,20],'2085'=>[19,20,22,21],'2086'=>[20,20,22,21],'2087'=>[20,21,22,21],'2088'=>[19,20,22,20],'2089'=>[19,20,22,21],'2090'=>[20,20,22,21],'2091'=>[20,21,22,21],'2092'=>[19,20,22,20],'2093'=>[19,20,22,21],'2094'=>[20,20,22,21],'2095'=>[20,21,22,21],'2096'=>[19,20,22,20],'2097'=>[19,20,22,21],'2098'=>[20,20,22,21],'2099'=>[20,21,22,21]) };
my %tab;
$jahreszeiten->(\%tab);
for (my $jahr = 2010; $jahr < 2021; $jahr ++) {
    say "Beispiel fuer $jahr: ".$tab{$jahr}[0].'. Maerz + '.$tab{$jahr}[1].'. Juni + '.$tab{$jahr}[2].'. September + '.$tab{$jahr}[3].'. Dezember';
}