Add Day 5, Puzzle 2 solution

src/Main.hs

@@ -4,7 +4,7 @@ import Day01 (day01_1, day01_2)
 import Day02 (day02_1, day02_2)
 import Day03 (day03_1, day03_2)
 import Day04 (day04_1, day04_2)
-import Day05 (day05_1)
+import Day05 (day05_1, day05_2)
 import System.Environment (getArgs)
 
 main :: IO ()
@@ -32,8 +32,10 @@ main = do
       day04_1
       day04_2
     "5" : "1" : _ -> day05_1
+    "5" : "2" : _ -> day05_2
     "5" : _ -> do
       day05_1
+      day05_2
     "all" : _ -> do
       day01_1
       day01_2
@@ -44,4 +46,5 @@ main = do
       day04_1
       day04_2
       day05_1
+      day05_2
     _ -> error "Not implemented"