-- Aufgabe 3

convert :: String -> Integer
convert str
    | num == "" = 0
    | otherwise = read (num) :: Integer
    where num = extractDigits(str)