main :: IO ()
main = do
    cachedInternet <- cachedIO 600 crawlTheInternet   -- 10 minute cache
    print =<< searchEngine "Haskell" cachedInternet
    print =<< searchEngine "C#" cachedInternet
main :: IO ()
main = do
    cachedInternet <- cachedIO 600 crawlTheInternet   -- 10 minute cache
    print =<< searchEngine "Haskell" cachedInternet
    print =<< searchEngine "C#" cachedInternet
main = do
    cachedInternet <- cachedIO 600 crawlTheInternet   -- 10 minute cache
    print =<< searchEngine "Haskell" cachedInternet
    print =<< searchEngine "C#" cachedInternet