Сообщения

1

Базы данных / Perl для работы с базами данных "1С Бухгалтерия".

« : 19 Июня 2004, 11:56:12 »

Добрый день.
Можно ли с помощью Perl работать с базами данных 1С Бухгалтерия и практикуется ли это вообще?
Спасибо.

2

Perl / Не выполняется простейший скрипт на Денвере.

« : 22 Сентября 2003, 19:31:58 »

Дмитрий Котеров (автор пакета Денвер) говорит:
  Z:\\usr\\lib\\CGI.pm:
  $CGI::VERSION=\'2.752\';

 из чего я понял, что на Денвере установлен таки модуль CGI.pm, версии 2,752. Значит что то другое.

3

Perl / Не выполняется простейший скрипт на Денвере.

« : 22 Сентября 2003, 19:19:03 »

Хорошо я уточню на Денвере.

4

Perl / Не выполняется простейший скрипт на Денвере.

« : 22 Сентября 2003, 18:24:17 »

Ништяк спасибо. Заработала. А я и не вижу.
 В предыдущем сообщении я совсем забыл скинуть скрипт с использованием модуля CGI.pm. Вот он:
#!/usr/bin/perl -w
# cgi-bin/lce_cream
use CGI qw(:standard);
print header();
print start_html("Hello World"), h1("Hello World");
my $favorite = param("flavor");
print p("Your favorite flavor is $favorite.");
print end_html()

  После того как я убрал точку с запятой из последней строки осталась только одна ошибка, вот она:
 
[Tue Sep 23 00:06:03 2003] [error] [client 127.0.0.1] BEGIN failed--compilation aborted at \\home\\test3.ru\\cgi\\dir_imp.cgi line 3.

 Примерно по русски:
 Предотвращен запуск \\home\\test3.ru\\cgi\\dir_imp.cgi из-за неудачной компиляции на 3-й строке скрипта.
  Вот.

5

Perl / Установка модулей на Денвер.

« : 22 Сентября 2003, 17:51:07 »

На Денвере молчат. А если что то запрещено покажите где написано что запрещено.

6

Perl / Не выполняется простейший скрипт на Денвере.

« : 22 Сентября 2003, 15:40:35 »

Доброго времени суток.
При запуске следущего скрипта:
#!/usr/bin/perl -w
print <Content-type: text/html;

Greetings, Terrans!

end_print;


выходят две ошибки в файле error:

[Mon Sep 22 04:41:48 2003] [error] [client 127.0.0.1] Premature end of script headers: /home/test.ru/cgi/prostaya.cgi
[Mon Sep 22 04:41:48 2003] [error] [client 127.0.0.1] Can\'t find string terminator "EOF" anywhere before EOF at \\home\\test.ru\\cgi\\prostaya.cgi line 2.

Я не знаю английского, но примерно 2-я означает, что вроде как "не в состоянии обнаружить указатель конца строки "end_print" в пределах до того как закончен файл". А 1-я " Преждевременный вызов некого скрипта из /home/test.ru/cgi/prostaya.cgi ".
Мне не ясно какую ошибку я мог совершить при указании конца строки here-документа, а также не ясна суть претензий по первой ошибке.
В строке браузера набираю: http://test.ru/cgi/prostaya.cgi
Соответственно скрипт находится в папке home/test.ru/cgi/prostaya.cgi
Я задавал этот вопрос на форум Денвера, но там молчат. Скрипт в принципе простой, так что бы освоить CGI.

Похожая какртина с использованием модуля CGI.pm

Ошибки:
[Mon Sep 22 15:46:58 2003] [error] [client 127.0.0.1] Premature end of script headers: /home/test3.ru/cgi/dir_imp.cgi
[Mon Sep 22 15:46:58 2003] [error] [client 127.0.0.1] Can\'t locate CGI.pm in @INC (@INC contains: .) at \\home\\test3.ru\\cgi\\dir_imp.cgi line 3.

[Mon Sep 22 15:46:58 2003] [error] [client 127.0.0.1] BEGIN failed--compilation aborted at \\home\\test3.ru\\cgi\\dir_imp.cgi line 3.

1-я. Преждевременный вызов некого скрипта из: /home/test3.ru/cgi/dir_imp.cgi
2-я. Не в состоянии определить местоположение в @INC.
3-я. Предотвращен запуск \\home\\test3.ru\\cgi\\dir_imp.cgi из-за неудачной компиляции на 3-й строке скрипта.

(по сравнению с первым скриптом изменилась только папка с test.ru на test3.ru).

Примеры взяты из книги «Изучаем Perl” Рэндала Шварца и Тома Кристиана.
Подскажите примерно, где может быть ошибка? Или скинте рабочий пример взаимодействия Perl с HTML который идет на Денвере.
Спасибо.

7

Perl / Установка модулей на Денвер.

« : 22 Сентября 2003, 15:32:28 »

Я прочитал наблу: Установка модулей Perl, или как стать «сам себе администратором» на http://dklab.ru/chicken/nablas/5.html
и уменя возник следущий вопрос. Как быть если у меня Денвер установлен на вторичном диске, где нет подключения к Интернету (что я сделал специально, что бы не воевать с контроллером удаленного доступа, так как  Windows на первичном работает с ошибками).  На основном диске не установлен Perl и вообще не вызывается командная строка (я говорил, что Виндовс работает с ошибками). Могу ли я скачать и установить модуль в ActivePerl каким-нибудь другим способом?
 Спасибо.

8

Perl / Взаимодействие Perl с HTML.

« : 20 Сентября 2003, 19:01:17 »

Отправка сообщений с полей формы и вывод их на страницу, ну и так далее.

9

Perl / Взаимодействие Perl с HTML.

« : 20 Сентября 2003, 16:24:28 »

Не подскажите где в русском Интернете можно найти хорошее руководство по взаимодействию Perl с HTML, или книгу. А то в "Программирование на Perl" я такого почему то не нашел.
 Спасибо.

10

Perl / Не разберусь в примере из учебника.

« : 16 Сентября 2003, 09:06:00 »

Ясно. Просто я думал, что первый аргумент любого объекта - его инвокант. Наверно это только при создании объекта первым аргументом передаваемом конструктору будет его класс, а потом при использовании объекта первым будет то что передано ему (объекту) в качестве значения в конструкторе, в данном случае это сссылка на анонимный хеш. Я правильно все понял?
 Спасибо.

11

Perl / Не разберусь в примере из учебника.

« : 15 Сентября 2003, 15:14:35 »

Просто надо же понимать такие вещи.

12

Perl / Не разберусь в примере из учебника.

« : 14 Сентября 2003, 00:17:18 »

В вашем коде мне все ясно, но я хотел бы разобраться в своем.

13

Perl / Не разберусь в примере из учебника.

« : 13 Сентября 2003, 14:18:58 »

В одном из учебников Perl в теме «Прегрузка» встречаю такой код:
  package  PsychoHash;
  use overload ‘%{}’ => \\&as_hash;
  sub as_hash {
    my ($x) = shift;
    return { @$x };
}
sub new {
   my $class = shift;
   return bless [ @_ ] => $class;
}
$critter = new  PsychoHash( height => 72, weight => 365, type => “camel” );
print $critter->{weight};   #prints 365

Пример показывает реализацию объекта как анонимного массива, разрешающего ссылку через хеш. Я не пойму что происходит в обработчике  as_hash:
1)   my ($x) присваевается инвокант объекта $critter (в качестве первого аргумента любого объекта);
2)   далее возвращается анонимный хеш значениями которого являются значения массива @x.
3)   и как из всего этого print выводит число 365, неясно.
 То есть я догадываюсь, что {weight} является ключом в анонимном хеше, который должен там вернуть свое значение, которым является 365. Но как это конкретно происходит в  as_hash не пойму.  Короче, что  присваевается  ($x) и что возвращает { @$x }.
   Вроде все.
   Спасибо.

14

Perl / Таблица символов для Unicode и ASCII.

« : 10 Сентября 2003, 08:03:32 »

Существует ли какая то таблица символов для Unicode и ASCII в которую можно было бы заглянуть если нужно например узнать число соответствущее нужному символу и наоборот. Я в курсе что есть функции chr, ord. Без них никак нельзя? Я просто не в курсе. Я понятно спрашиваю?
 Спасибо.

15

Perl / Конструкторы объектов.

« : 09 Сентября 2003, 17:55:32 »

Все понятно. Спасибо.