Ви не можете вибрати більше 25 тем Теми мають розпочинатися з літери або цифри, можуть містити дефіси (-) і не повинні перевищувати 35 символів.

16 рядки
433B

  1. module IrcBot.RemoteUploader where
  2. import System.Process
  3. uploadLocalFile :: String -> IO String
  4. uploadLocalFile filePath =
  5. do
  6. if filePath /= "" then do
  7. let command = "curl"
  8. let params = "file=@"++ filePath
  9. readProcess command ["-F",params,"0x0.st"] ""
  10. else return $ ";_;"