[Haskell] Automated YouTube uploads