{-# LANGUAGE OverloadedStrings #-}

module Main where

import Network.Pagarme
import Network.Wreq

main :: IO ()
main = do
  let usingKey = withApiKey "YOUR_API_KEY"
  t <- getTransactions $ (byPage 1 . byConfirmedStatus . usingKey) defaults
  print t