import Text.JRegex
import Text.JRegex.PCRE
import Array


main = do
    print ("hellofooobarbobfoobarbad" =~ "fo*bar" :: Int)
    print ("hellofooobarbobfoobarbad" =~ "fo*bar" :: String)
    print ("hellofooobarbobfoobarbad" =~ "fo*bar" :: (String,String,String))
--    print ("hellofooobarbobfoobarbad" =~ "fo*bar" :: [Either String String])
    print ("hellofooobarbobfoobarbad" =~ "fo*bar" :: Bool)
    print ("hellofooobarbobfoobarbad" =~ "fo*bar" :: ())
    print ("hellofooobarbobfoobarbad" =~ "fo*bar" :: [String])
    print ("hellofooobarbobfoobaaarbad" =~ "f(o*)b(a+r)" :: Array Int String)
--    print ("hellofooobarbobfoobaaarbad" =~ "f(o*)b(a+r)" :: (String,Array Int String))
    print ("hellofooobarbobfoobaaarbad" =~ "f(o*)b(a+r)" :: [Array Int String])