Отдал бы и ползарплаты!
Войти
!bnw
Сегодня
Клубы
yesperl
tkabber
быдлокодинг
notcl
perl -p -e 's/^.*timestamp ([0-9]{4})([0-9]{2})([0-9]{2})T([0-9]{2})([0-9]{2})([0-9]{2}) .*nick (.*) body {?(.*?)}?$/\1\/\2\/\3 \4:\5:\6 \7> \8/;s/\\n/ /g'
#JVDP1R
/
@l29ah
/
4883 дня назад
$ cat ~/bin/tkabber-log #!/usr/bin/perl while (<STDIN>) { /^timestamp (.*?) jid (.*?) nick (.*?) body (.*)$/; ($time, $nick, $body) = ($1, unescape($3), unescape($4)); $nick = "$nick: " if $nick; print "$time $nick$body\n" } sub unescape($) { $x = shift; $x =~ s/(^\{|\}$)
g; $x =~ s/\\n/\n/g; $x =~ s/\\\\/\\/g; return $x; }
#JVDP1R/66D
/
@lexszero
/
4883 дня назад
@lexszero
У меня ДВОЕТОЧИЯ ПОЛУЩ.
#JVDP1R/97Z
/
@l29ah
-->
#JVDP1R/66D
/
4883 дня назад
Ты это кого пидором тут назвал, ааа?
#JVDP1R/NAZ
/
@vrusha
/
4883 дня назад
BnW для ведрофона
BnW на Реформале
Викивач
Котятки
Цоперайт © 2010-2016
@stiletto
.