Code Dojo 35 with @dalecr

count8s.hs

import Data.List
count8s number = let
    len = length $ filter (\string -> (read string :: Int) `mod` 8 == 0) $ tail $ subsequences number
    in len `mod` (10^9+7)

count8s.py

def count8s(number):
    final = 0
    for i in range(1, len(number)):
        combos = combinations(number,i)
        filtered = [int(''.join(j)) for j in combos if int(''.join(j)) % 8 == 0]
        final += len(filtered)
    if int(number) % 8 == 0: final += 1
    return final