12 lines
254 B
Haskell
12 lines
254 B
Haskell
|
module Main where
|
||
|
|
|
||
|
|
import Data.Function ((&))
|
||
|
|
import qualified Data.List as L
|
||
|
|
|
||
|
|
-- | Run this to export the grocery list.
|
||
|
|
main :: IO ()
|
||
|
|
main = do
|
||
|
|
x <- readFile "./list.txt"
|
||
|
|
x & lines & filter (not . L.isPrefixOf "- 0x") & unlines & putStrLn
|
||
|
|
pure ()
|