PL
"a*?"
Size: a a a
2020 July 02
AV
так не скомпиляется
AV
щас перепроверю
AV
regex-with-prce не собирается даже из коробки 🙁
AV
*** Exception: user error (parseRegex for Text.Regex.TDFA.String failed:"a*?" (line 1, column 3):
unexpected '?'
expecting empty () or anchor ^ or $, an atom, "|" or end of input)PL
TDFA - это posix
AV
Prelude Text.Regex.PCRE.ByteString T T> Right r1 <- compile compUTF8 execNoUTF8Check "a*?"
Prelude Text.Regex.PCRE.ByteString T T> Right qq <- execute r1 "aaa"
Prelude Text.Regex.PCRE.ByteString T T> qq
Just (array (0,0) [(0,(0,0))])
Prelude Text.Regex.PCRE.ByteString T T> Right qq <- execute r1 "aaa"
Prelude Text.Regex.PCRE.ByteString T T> qq
Just (array (0,0) [(0,(0,0))])
AV
Врооде норм заматчил 🙂
AV
не 🙁
Prelude Text.Regex.PCRE.ByteString T T> Right qq2 <- regexec r1 "aaa"
Prelude Text.Regex.PCRE.ByteString T T> qq2
Just ("","","aaa",[])PL
Это с кириллицей?
PL
Без юникода, кстати, всё норм работает.
AV
Right r4 <- compile compUTF8 execNoUTF8Check "<a>.*?</a>"
Right qq5 <- regexec r4 "<a>123</a></a>"
Prelude Text.Regex.PCRE.ByteString T T> qq5
Just ("","<a>123</a>","</a>",[])
вот так норм, щас кирилицу попробуем
Right qq5 <- regexec r4 "<a>123</a></a>"
Prelude Text.Regex.PCRE.ByteString T T> qq5
Just ("","<a>123</a>","</a>",[])
вот так норм, щас кирилицу попробуем
AV
Right r5 <- compile compUTF8 execNoUTF8Check (T.encodeUtf8 "<ъ>.*?</ъ>")
Prelude Text.Regex.PCRE.ByteString T T> Right qq6 <- regexec r5 $ T.encodeUtf8 "<ъ>123</ъ></ъ>"
Prelude Text.Regex.PCRE.ByteString T T> qq6
Just ("","<\209\138>123</\209\138>","</\209\138>",[])
тоже норм
Prelude Text.Regex.PCRE.ByteString T T> Right qq6 <- regexec r5 $ T.encodeUtf8 "<ъ>123</ъ></ъ>"
Prelude Text.Regex.PCRE.ByteString T T> qq6
Just ("","<\209\138>123</\209\138>","</\209\138>",[])
тоже норм
PL
Но это всё же компилить надо...
AV
putStrLn $ fromJust $ qq6 ^? _Just . _2 . utf8 . unpacked
<ъ>123</ъ>
<ъ>123</ъ>
AV
Да везде почти надо
AV
где-то это от тебя прячут просто
JS
Right r4 <- compile compUTF8 execNoUTF8Check "<a>.*?</a>"
Right qq5 <- regexec r4 "<a>123</a></a>"
Prelude Text.Regex.PCRE.ByteString T T> qq5
Just ("","<a>123</a>","</a>",[])
вот так норм, щас кирилицу попробуем
Right qq5 <- regexec r4 "<a>123</a></a>"
Prelude Text.Regex.PCRE.ByteString T T> qq5
Just ("","<a>123</a>","</a>",[])
вот так норм, щас кирилицу попробуем
he comes! he comes!
AV