module Main where

import System.Environment
import Download

main :: IO ()
main = do 
    args <- getArgs
    htmlResult <- downloadHtmlDef (head args)
    putStrLn htmlResult