Доброго времени суток.
Недавно узнал, что существует язык tcl, и что мне придётся столкнуться с результатами его деятельности :D
Возможна ли в perl работа со строками tcl? Есть файл, состоящий из результатов выполнения команды
puts $fd [str_to_log [list timestamp $ts jid $from nick $nick body $body]]
str_to_log выполняет замены
\\ -> \\\\ \r -> \\r \n -> \\n
Можно ли с помощью perl получить из этого файла исходное $body, без всяких группировок и экранированияй, вызванных применением tcl-команды list? Или придётся срочно изучать tcl для перекодировки?
