From: "Rinat H. Sadretdinow" 2:5020/620 08 Jan 2019 21:29 +0200
To: Alexey Vissarionov 2:5020/545
Subject: perl-5.26.2
Hello Alexey! 08 Jan 19 17:52, you wrote to me: RHS>> Я вот не вижу никакого смысла переходить на версию старше 1.4, RHS>> меня тут всё устраивает. Вот если не будет чем-то устраивать RHS>> что в новых версиях есть, тогда и перейду. AV> Устраивает - пользуй. Что я и делаю. AV> Hе устраивает - обновляйся. Что я (пока?) не собираюсь делать. AV> Hе хочешь обновляться - не жалуйся. Да я вроде и не жалуюсь, меня всё пока что устраивает. Bye!
From: Dmitriy Kulikov 2:6090/14 05 Jan 2019 04:17 +0200
To: Dima Bargamov 2:5020/570.1
Subject: Автоматически создаваемые эхи
Paco esti kun vi, *Dima* ! 04 Янв 19 10:17, you wrote to me: DK>> Подскажите, пожалуйста на что в 1.9 поменяли параметры описания DK>> линка: DK>> AutoAreaCreateFile C:\NODE\SOFT\HUSKY\config.areas DK>> AutoAreaCreateDefaults -b Squish -g z -dupeCheck del -dupeHistory DK>> 11 DB> Попробуй DB> areafixautocreatefile DB> areafixautocreatedefaults Да, спасибо! То, что нужно! Дмитрий Ю. Куликов для эхоконференции _Husky-project (hpt htick fidoconfig)_ [05 Янв 19 - 09:17] ... https://vk.com/strangavira ...
From: Cheslav Osanadze 2:6078/80 03 Jan 2019 13:31 +0200
To: Vladimir Fyodorov 2:50/15.2
Subject: Срок храния писем по дням
Привет, Vladimir! 02 янв 19 23:01, Vladimir Fyodorov -> Brother Rabbit: VF>>> Пробел лишний, вроде. BR>> Hе. С пробелом все в порядке. VF> Значит, со сквишом спутал, бывает. В сквише, кажется, это была буковка "d". Cheslav. ... Дайте мне точку опоры - и я обопрусь.
From: Brother Rabbit 2:460/5858 02 Jan 2019 21:12 +0200
To: Vladimir Fyodorov 2:50/15.2
Subject: Срок храния писем по дням
Hi, Vladimir! 02 янв 19 18:56, Vladimir Fyodorov -> Cheslav Osanadze: CO>> Как его правильно указывать? -p 30 VF> Пробел лишний, вроде. Не. С пробелом все в порядке. Have nice nights. Brother Rabbit.
From: husky inspector 2:5020/1042.3 15 Dec 2018 02:00 +0200
To: All
Subject: Changes in husky sources
Legend: (A) Added, (C) Copied, (D) Deleted, (M) Modified, (R) Renamed, (T) Type changed, (U) Unmerged, (X) Unknown, (B) Pairing Broken =========================== fidoconf: add github releases Author: Alexander Skovpen Date: 2018-12-14 10:44:47 +0300 Committed by: dukelsky Files: M .travis.yml M CMakeLists.txt M appveyor.yml
From: Alexander Kruglikov 2:5053/58 12 Dec 2018 12:16 +0200
To: All
Subject: Husky 1.9 snapshot 2018.12.11 for macOS
Good ${greeting_time}, All! macOS version uploaded to http://download.huskyproject.org/osx/ and hatched to AFTNMISC. Changelog: fidoconf: fix parsing route line; flavor is not necessary anymore before nopack hpt: fix description of the Route statement and explain it in detail * Originally in FIDOSOFT.HUSKY * Crossposted in RU.HUSKY With best regards, Alexander.
From: husky inspector 2:5020/1042.3 10 Dec 2018 02:00 +0200
To: All
Subject: Changes in husky sources
Legend: (A) Added, (C) Copied, (D) Deleted, (M) Modified, (R) Renamed, (T) Type changed, (U) Unmerged, (X) Unknown, (B) Pairing Broken =========================== hpt: fix description of the Route statement and explain it in detail Author: Michael Dukelsky Date: 2018-12-09 18:16:51 +0300 Committed by: Michael Dukelsky Files: M doc/hpt.texi =========================== hptzip: fix description of the Route statement and explain it in detail Author: Michael Dukelsky Date: 2018-12-09 18:41:41 +0300 Committed by: Michael Dukelsky Files: M hpt.md
From: Michael Dukelsky 2:5020/1042 08 Dec 2018 14:46 +0200
To: Brother Rabbit 2:460/5858
Subject: perl
Привет, Brother! 08 Dec 18 14:25, Brother Rabbit послал(а) письмо к Michael Dukelsky: MD>> А полный путь указать не пробовал? BR> Нет. Я решил сразу разъююкивать, т.к. вызывать из скрипта бинарь, что BR> бы потом за ним еще ююки удалять, мне показалось не удобно. Ну, в общем-то это ты правильно решил. [...skipped...] BR> Сдедлал вот так: BR> === Import Windows Clipboard Start === BR> $uuedir = "\/home\/fido\/uue"; BR> # директория, в которой складывать разююки. BR> if (defined($area)) { BR> if ( $text =~ /\rbegin 644[ ]+([^ \r]+)\r(.*\r)end\r/i ){ BR> @uuelines = split(/\r/,$2); BR> my $ofile = "$uuedir\/" . uc($area) ."\/$1"; BR> mkdir "$uuedir\/" . uc($area) if !-e "$uuedir\/" . BR> uc($area); BR> my $i = 0; BR> while (-e $ofile) { BR> $ofile = "$uuedir\/".uc($area)."\/".sprintf("%08x", BR> time()).sprintf("%02d",$i)."$1"; BR> $i++; BR> if ($i > 255) { BR> $ofile = "$uuedir\/" . uc($area) BR> ."\/$1"; BR> unlink($ofile); BR> } BR> } BR> # w_log("uue of \"$ofile\" found."); BR> if (open(F, ">>$ofile")){ BR> binmode(F); BR> foreach my $val ( @uuelines ){ BR> $uudecoded_data = unpack("u", $val); BR> print(F $uudecoded_data); BR> } BR> close(F); BR> # w_log("Dcoded \"$ofile\" from Area BR> \"$area\"."); BR> } else { BR> w_log("Can't open \"$ofile\"\: $!\."); BR> } BR> } BR> } BR> === Import Windows Clipboard End === BR> На линуксовой машине работает. Разъююкивает и по директориям BR> раскладывает. Прекрасно. Можно ещё несколько раз встречающийся текст "$uuedir\/" . uc($area) в самом начале записать в переменную. Желаю успехов, Brother! За сим откланиваюсь, Michael. ... node (at) f1042 (dot) ru
From: Brother Rabbit 2:460/5858 08 Dec 2018 11:18 +0200
To: Michael Dukelsky 2:5020/1042
Subject: perl
Hi, Michael! 07 дек 18 21:23, Michael Dukelsky -> Brother Rabbit: BR>> sub filter() BR>> { BR>> $uuedir = "\/home\/fido\/uue"; BR>> # директория, в которой складывать ююки. BR>> if ($area =~ /RU\.SEX\.SIMVOL/i) { MD> ^^^^^^^^^^^^^^^^^^^^^ MD> Поскольку эха вроде бы одна, достаточно if(lc($area) eq "ru.sex.simvol") Ну, да. Так, видимо, быстре будет. BR>> if ( $text =~ /\rbegin 644[ ]+([^ \r]+)\r.*end\r/si BR>> ){ BR>> my $ofile = "$uuedir\/$1"; BR>> w_log("uue of \"$ofile\" found."); BR>> if (open(F, ">$ofile\.uue")){ BR>> print(F $text); BR>> close(F); BR>> system("uudecode -o $ofile $ofile\.uue"); #>>> -------------------------^^^^^^^ не срабатывает. Так и должно быть #>>> или я где-то ошибся? MD> Вроде бы никаких принципиальных запретов нет. У меня system() в MD> filter.pl срабатывает. Вот в этом я и сомневался. MD> Но надо указать полный путь к uudecode. Скорее всего в этом дело. Похоже, не наследуются переменные окружения. MD> Если паче чаяния и это не сработает, то попробуй такой фокус: MD> my @args = ("/path/to/uudecode", "-o", "$ofile", "$ofile\.uue"); MD> system(@args); Спасибо. Попробую. Have nice nights. Brother Rabbit.
From: Michael Dukelsky 2:5020/1042 07 Dec 2018 21:23 +0200
To: Brother Rabbit 2:460/5858
Subject: perl
Привет, Brother! 07 Dec 18 15:00, Brother Rabbit послал(а) письмо к All: BR> вставляю в filter.pl код: BR> sub filter() BR> { BR> $uuedir = "\/home\/fido\/uue"; BR> # директория, в которой складывать ююки. BR> if ($area =~ /RU\.SEX\.SIMVOL/i) { ^^^^^^^^^^^^^^^^^^^^^ Поскольку эха вроде бы одна, достаточно if(lc($area) eq "ru.sex.simvol") BR> if ( $text =~ /\rbegin 644[ ]+([^ \r]+)\r.*end\r/si ){ BR> my $ofile = "$uuedir\/$1"; BR> w_log("uue of \"$ofile\" found."); BR> if (open(F, ">$ofile\.uue")){ BR> print(F $text); BR> close(F); BR> system("uudecode -o $ofile $ofile\.uue"); #>> -------------------------^^^^^^^ не срабатывает. Так и должно быть #>> или я где-то ошибся? Вроде бы никаких принципиальных запретов нет. У меня system() в filter.pl срабатывает. Но надо указать полный путь к uudecode. Если паче чаяния и это не сработает, то попробуй такой фокус: my @args = ("/path/to/uudecode", "-o", "$ofile", "$ofile\.uue"); system(@args); Желаю успехов, Brother! За сим откланиваюсь, Michael. ... node (at) f1042 (dot) ru