@ugnich, У меня в tkabber4juick вот так: (?:\s|\n|\A|\()(#\d+(/\d+)?|@[\w@.-]+|\*[\w?+'/.-]+|>[^\n]+)

@ugnich, @Totktonada Боюсь, это ничем не поможет. :)

@ugnich, @arts А если вообще \b вместо (\s|\n|\A)?

@ugnich, @XAR А он /n будет заменять собой?

@ugnich, @arts Тогда, кстати, и запоминать не надо начало и конец.

@ugnich, @Totktonada \n

@ugnich, @Totktonada Он не заменяет, он индицирует начало/конец "слова".

@ugnich, @XAR Можно и так, но я пытаюсь сделать возможным, например, (#12345/67) или (http://juick.com/).

@ugnich, @ugnich (\b|\()

@ugnich, @Totktonada Тогда запоминать скобку придётся :(

@ugnich, @Totktonada Или скорее (?:\b|\() [если regexp'ы perl подобны тиклевским]

@ugnich, @arts Потому что из-за запоминания не работает такое: #1234 #1234 (два раза подряд).

@ugnich, @arts Жуйкочую. Не вижу смысла в while {}

@ugnich, Если честно, не совсем понял что парсят эти регулярки... Приходящие от юзера мессаги?

@ugnich, @Totktonada А какая разница. Там в каментах примеры: что было -> что надо.

@ugnich, @arts Скачал, запустил. Дошло :-)

@ugnich, @arts \n убрал, скобки (в одном месте) поправил, а вот модификатор m сильно уменьшает скорость.

@ugnich, @arts $a="http://juick.com/#1234" тоже, а не должно.

@ugnich, Может для @username имеет смысл использовать нечто вроде того, что в первом комменте? @[\w@.-]+ К сожалению, не знаю какой вариант быстрей/правильней.

@ugnich, @Totktonada Заменил, но скорости это не прибавило.

@ugnich, @ugnich А как ты меряешь скорость? Время выполнения этого скрипта?

@ugnich, @Totktonada Скачайте и запустите. ;) Benchmark.pm

@ugnich, @ugnich Да я уже. Просто не заметил строчку внизу)

@ugnich, в конце всех регекспов кроме укорачивателя ссылок выражение (\s|\Z) заменить на (\s|\Z|[[:punct:]]) Тогда запись с пунктуацией (например #233228.) в конце будет правильно распознана.

@ugnich, А вот, кстати неплохая статейка по теме: meettya.habrahabr.ru

@ugnich, почему не так? $txt=~s/(\W)\([^\\n<>]+)\*(\W)/$1<b>$2<\/b>$3/gmx; разница в скорости 602.99/s / 817.86/s .

@ugnich, вроде по частям это тут обсуждалось, но почему-то не всё сместе: /m и \W

@ugnich, @inv У меня — 16129.03/s против 15384.62/s. Скорость уменьшилась

@ugnich, @inv m тормозит, а \W — немного не то.

@ugnich, @ugnich видимо дело в cygwin'е, sorry

@ugnich, ох, попробуй. dumpz.org

@ugnich, @freefd Работает немного быстрее. 16129.03/s -> 17241.38/s.

@ugnich, @Totktonada угу. я как раз около лишней 1000-1500 итераций выиграл.

@ugnich, @freefd Ники, которые содержат полный JID неправильно выделяет: @cillum@dolore.eu

@ugnich, @Totktonada обновите окно дампа на dumpz.org :)

@ugnich, @Totktonada Может, вам ещё помимо бенчмарков наклепать тестов? %)

@ugnich, @Thriller Наклепай ;-)
@freefd Теперь вроде всё путём. Кроме ссылки в скобках, которая, впрочем изначально не работала.

@ugnich, теперь регулярки умные и смотрят по сторонам, им не важны пробелы и пунктуация, но быстродействие на уровне решения @ugnich. dumpz.org

@ugnich, @freefd Я бы не сказал, что на уровне: 11904.76/s (см. предыдущие результаты)

@ugnich, @Totktonada последнее моё?

@ugnich, всё, последний вариант. dumpz.org

@ugnich, попытался воткнуть сократить в один regexp, по идее оно так будет проходить чуть быстрее, опять же на моём cygwin скорость выросла значительно: ~2 раза, задо закомментить bold, italic, amp, lt, gt, хотел обрабатывать bold и italic и underline в одном шаблоне, но пока не получилось сходу: $txt =~ s{([\&<>]|(\s|\A)(\)([^\\n<>]+)\(\s|\Z)|(\s|\A)(\)([^\/\n<>]+)\/(\
s|\Z))}{
my ($a,$b,$c,$d,$e) = ($1,$2,$3,$4,$5);
defined $c ? (
$c =~ \* ? $b.'<b>'.$d.'</b>'.$e :
$c =~ \/ ? $b.'<i>'.$d.'</i>'.$e :
# $c =~ _ ? $b.'<u>'.$d.'</u>'.$e :
'/'
) :
$a =~ \& ? '|' :
'\\'
}gmex;

@ugnich, @inv сделайте benchmark или покажите полностью код, чтобы мы тоже могли выполнить полностью в контексте примера.

@ugnich, @freefd я извиняюсь если где-то напутал, конец рабочего дня и надо срочно бежать, вот так: dumpz.org

@ugnich, @inv 2331.00/s при оригинальных 8500/s на моей машине. это не серьезно, извините.

@ugnich, @freefd по идее в этот regexp надо запихнуть подчи всё + сократить в нём шаблоны. ой забыл обернуть в while помоему

@ugnich, @freefd странно почему у меня всё наоборот

@ugnich, @inv У меня тоже раза в три скорость упала. Да и внешне не внушает доверия. :)

@ugnich, @ugnich странно где оно могло в 3 раза затормозить, может только если /m опять, у меня похоже перл старый очень в cygwin почему-то

@ugnich, upd. вроде бы пофиксил скобки и диез. dumpz.org

@ugnich, @freefd Пофиксил — это в какую сторону?

@ugnich, @Totktonada это в лучшую.

@ugnich, @freefd Ясно дело. Ладно, diff ответит на этот вопрос :-)