Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - frg

Страницы: [1] 2
1
Perl / Вывод графика на страничке
« : 11 Апреля 2001, 11:44:52 »
Спасибо за ссылку! Я ее уже скачал..

2
Perl / Вывод графика на страничке
« : 06 Апреля 2001, 06:49:07 »
Объясните, шо це таке GD & FLY.
Может быть где-то есть документация?

3
Perl / Удаление файла
« : 03 Апреля 2001, 10:40:09 »
Спасибо!

4
Perl / Как удалить строку из файла
« : 02 Апреля 2001, 10:13:38 »
Ты бы объяснил конкретнее..

5
Perl / Как удалить строку из файла
« : 02 Апреля 2001, 09:39:55 »
Можно и так
#!/usr/local/bin/perl

open (FILE,"tt.txt");
@LINES=;
close(FILE);

$le=$#LINES-1;

open(DATA,"+print DATA @LINES[0,1,3..$le];
close(DATA);

6
Perl / Как удалить строку из файла
« : 02 Апреля 2001, 06:04:31 »
Закачиваешь содержимое файла в массив (@aa), передаешь cодержимое массива в другой массив (@bb),ведешь счетчик строк, если номер строки (@aa) равен 3, то пропускаешь ее. Вот и все. А потом очищаешь содержимое предыдущего файла и закачиваешь в него содержимое @bb.

7
Perl / Русские символы
« : 04 Апреля 2001, 08:37:19 »
Достала меня борьба с этими символами, и я пошел по пути наименьшего сопротивления: при просмотре каталога программа переименовывает все файлы с русскими именами, заменяя их на свои, а соответствие записывает в файл descript.ion. Потом в far можно просматривать в режите описания.
Если кому надо скрипт, могу выслать.

8
Perl / Русские символы
« : 30 Марта 2001, 13:03:30 »
error.log:
Registry does not contain key SOFTWARE\\Apache
Group\\Apache\\1.3.6

9
Perl / Русские символы
« : 30 Марта 2001, 12:26:43 »
Я скачал новую настройку для Apache версия 1.3.19. Не знаю что я сделал неправильно, я добавил в apache\\conf\\httpd.conf строки
AddCharset WINDOWS-1251 .cp-1251
AddCharset CP866        .cp866  
AddCharset ISO-8859-5   .iso-ru
AddCharset KOI8-R       .koi8-r
После этого мой Apache загнулся. А когда я это убрал, то он обратно заработал. Скажите, в чем проблема? Может быть нужно еще что-то отконфигурировать. Или версия apache.exe не подходит, или я доку невнимательно читал..

10
Perl / Русские символы
« : 28 Марта 2001, 08:46:49 »
Я тут набрел на очень простой транслятор

#!/usr/local/bin/perl

print "\\"Content-Type: text/plain \\"

";
print "";

   $dos=" Ўў?¤?с¦§ЁcЄ<¬-RЇабвгдежзийклмноп??\'?":р++?%??\'\'""--?T?>????";
   $win="абвгдеёжзийклмнопрстуфхцчшщъыьэюяАБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ";

$in_tab=$dos;
$out_tab=$win;

$file=&trans($file);

   sub trans
   {  $instr= $_[0];
      $outstr="";

      for ($i=0; $i        {  $symb=substr($instr, $i, 1);
           $pos=index($in_tab, $symb);
           if ($pos>=0)
             {  $newsymb=substr($out_tab, $pos, 1);
                $outstr.=$newsymb;
             }
           else
             {  $outstr.=$symb;
             }
        }
      return ($outstr);
   }

print "";
В переменную $file подставляю имя файла.
Я думал, что разница в кодировках dos - windows. Но это не так. Видимо нужно кодировать типа % 219 % 221 и т.д.
Незнаю, может я и не прав..
А в error.log пишет
[Wed Mar 28 10:00:35 2001] [error] [client 192.168.1.23] File does not exist: f:
/www/users/frg/-Ф-+-А-¦-¦-В-+-А-Г -Ъ-Г-А-¦-_-+-Б-¦-+-¦ -в-н-ж1.doc

IIS я не пробовал.

11
Perl / Русские символы
« : 27 Марта 2001, 05:54:26 »
Apache/1.3.6 (Win32)
OS Windows 98

12
Perl / Русские символы
« : 26 Марта 2001, 06:39:55 »
Уважаемый Alex_k!
Если бы все было так просто.. Кавычки помогают в том случае, если у тебя вместо пробелов в длинных именах не стоит % 20  и работает только с латинскими символами. А если встречаются русские символы, выдается сообщение об ошибке..

13
Perl / Русские символы
« : 23 Марта 2001, 08:27:20 »
Уважаемые NAS и LODEVAR! Ну а если хочется прочесать дикс и сгенерировать страничку.. И там не только *.mp3 но и *.doc, *.xls и всякая другая лабуда.. Я же говорю, что наверное это уже кто-то придумал и без меня. У меня идея заключается в том, чтобы создать в intranet WebServer где каждому зарегистрированному useru будет отводиться место на диске в его личном домашнем каталоге, куда он будет заливать столько информации, сколько ему нужно. (что-то типа хостинга..). Проблемма в том, что *.doc, *.xls файлы user-ы любят создавать с длинными русскими именами. Вот и вся суть проблеммы..

14
Как я понял у тебя отдельные html файлики на каждого..
Если это так, то попробуй
$atime=localtime((stat("$userdir/$file"))[8]);
$mtime=localtime((stat("$userdir/$file"))[9]);
Соответственно время создания и время последнего изменения..
Ну а потом сравни текущее время и одну из этих переменных. Если тебя устраивает все, то пропускаешь файл, а если нет, то переписываешь содержимое файла в массив, заменяешь color "red" на "black" или вообще удали эту страничку, удали содержимое файла и запиши по новой из массива..
Дальше все просто..

15
Perl / Вывод графика на страничке
« : 05 Апреля 2001, 09:03:18 »
Есть скрипт, который берет из базы данных циферки и по ним строит график.
Но есть одно неудобство: график состоит из множества точек, прописанных типа

Есть ли возможность формировать на стороне сервера рисунок, типа *.bmp и потом его передавать клиенту

Страницы: [1] 2