HaskellでGoogleドキュメントのドキュメントをアップロードするには？

Question

私は基本的に、私はこの小さなC＃プログラムは、（Googleのサンプル・プログラムから適応）ん何Haskellでやりたい、Haskellの内からGoogleドキュメントの文書を作成したい：

using Google.GData.Documents; 
using Google.GData.Client; 

namespace DocListUploader 
{ 
    public class GDocConsole 
    { 
     static void Main() 
     { 
      var user = "..."; 
      var passwd = "..."; 
      var file = "..."; 

      service = new DocumentsService("DocListUploader"); 
      service.setUserCredentials(user, passwd); 
      service.UploadDocument(file, null); 
     } 
    } 
} 

GoogleドキュメントAPIの説明からhere これは、hereと答えました。私は、2つのHTTP POSTを送信し、OAuthの認証を完了させることは「唯一の」問題だと理解しましたが、誰かがすでにそれを行い、私のためのいくつかのコードサンプルを持っていますか？

EDIT：それでもOAuthのライブラリを使用する方法を見つけ出すことができなかったので、私はほんの少しのC＃ラッパーを書いた：HS-DOTNET経由

using Google.GData.Documents; 
using Google.GData.Client; 

public class GoogleDoc 
{ 
    public static int Upload(string user, string passwd, string file) 
    { 
     try 
     { 
      var service = new DocumentsService("DocListUploader"); 
      service.setUserCredentials(user, passwd); 
      service.UploadDocument(file, null); 

      return 0; 
     } 
     catch 
     { 
      return -1; 
     } 
    } 
} 

とハスケルからこのラッパーと呼ばを：

module Upload where 

import NET 

upload :: String -> String -> String -> IO (Int) 
upload user passed file = 
    invokeStatic "[GoogleDoc.dll]GoogleDoc" "Upload" (user, passed, file) 

testLocal :: IO() 
testLocal = do 
    let user = "..." 
    let passwd = "..." 
    let file = "..." 
    returnCode <- upload user passwd file 
    putStrLn (show returnCode) 

Answer 1

haskell-oauthライブラリを使用してoauthを実行し、ドキュメントをアップロードすることができます。すでに述べたように、Haskellからhttpパッケージを試すことができます。