--- /dev/null
+import Network
+import Network.HTTP.Lucu
+import SmallFile
+
+main :: IO ()
+main = let config = defaultConfig { cnfServerPort = PortNumber 9999 }
+ resources = mkResTree [ ([], smallFile) ]
+ in
+ do putStrLn "Access http://localhost:9999/ with your browser."
+ runHttpd config resources
+
\ No newline at end of file