Сообщения

16

Perl / Как заставить *.bat запустить скрипт на perl?

« : 06 Июня 2007, 17:08:18 »

arto

Это не терминология, это ошибка...
Добавить в массив @INC модуль, или расположить его так, что бы он находился в одной из папок перечисленных в массиве @INC - две разные вещи, не только по смыслу, но и по действиям...
Вам, как "Профессиональному" разработчику - это должно быть понятно...
Мне же, как "Обычному" разработчику, только придираться...

Можно, конечно рака назвать ежом, а потом говорить, что и так всем понятно, что Вы имели ввиду...

А по сути. Еще раз:
Модуль переносить (копировать, создавать) не в один(ом) из каталогов массива @INC, а добавить в массив @INC каталог локальных (проектных) модулей c помощью прагмы lib.

Не Вам ли, как "профессиональному" разработчику не понимать, что поддержка и обновление проекта осуществляется проще, если все расположено в одном месте, а не разбросано по всему серверу...

17

Perl / Как заставить *.bat запустить скрипт на perl?

« : 06 Июня 2007, 16:33:24 »

arto
2. Вопрос риторический... и не по существу...

P.S. Ложь в том, что эта команда выводит не содержимое @INC а содержимое папок указаных в @INC. При этом хотите сказать, что в @INC кроме папок есть что-то еще...

Я не сомневаюсь, что команду Вы набрали правильно и что ошибку она не выдаст, так же как не выдаст и содержание массива @INC в чистом виде...

18

Perl / Как заставить *.bat запустить скрипт на perl?

« : 06 Июня 2007, 15:49:37 »

arto
2. Может его сначала стоит поискать, а потом уже создавать новый, если не нашли?

3. Быть может, не в это суть...

P.S. А врать нехорошо...
В массиве @INC перечислены каталоги в которых Perl ищет модули...
И нет там никакого списка файлов... нет... только список каталогов...
Или Вы скажете, что "ls -alF" это случайность?

19

Perl / Как заставить *.bat запустить скрипт на perl?

« : 06 Июня 2007, 15:11:30 »

arto
1.

вызывает. модули должны лежать там, куда их положил разработчик.

Браво! А я думал они сами разбегаются по компу, что потом искать приходится...

2. Ошибка как минимум в том, что Вы создаете новый файл anEnv.pm. Дальше продолжать?

3. "Профессиональные" разработчики сначала в скрипте вызывают и использую модуль, а потом его создают? увы, не знал...

P.S. В @INC что лежит-то? Поподробнее пожалуйста...

P.P.S. Я флейм развел? Волну не гоните... ;-)

arto:
@ECHO "наверное у вас нет anEnv.pm в @INC."
@ECHO "поставте его."

20

Perl / Как заставить *.bat запустить скрипт на perl?

« : 06 Июня 2007, 14:38:45 »

arto
1.

Спасибо, но не рабоает! Пишет: Can\'t locate anEnv.pm in @INC (@INC contains....

У профессионального разработчика не возникло бы такого вопроса.
И я как разработчик понял что вы предлагаете неправильный вариант. Потому как - модули созданные в рамках определенного проекта, должны находиться в проекте а не в системных папках. Надеюсь, это у Вас не вызывает сомнений?

2. В том, что Ваш способ не решает проблемы;

3. Проблема в том, что у него существует этот файл. Вы же предлагаете создать новый. Вопрос - а зачем?

P.S. Вам бы тоже тогда почитать не мешает...

P.P.S. О чем? я такое решение предложил изначально...

21

Perl / Как заставить *.bat запустить скрипт на perl?

« : 06 Июня 2007, 13:59:14 »

arto

1. Так вот и не путайте теполое с мягким... Значит все-таки не в @INC а в один из каталогов;

2. Еще раз повторяю, что не говорил, что Ваш код, товарисч, не работает;

3. Ага, уже исправлять начали, добавлять. Только вот вопрос, а если он уже реально существует как anEnv.pm где-то, что же делать тогда?

P.S. И как perldoc помог?

P.P.S. Демагогию, предлагаю пректатить, ибо тема не пиписьками меряться...
Если хочешь померяться, заводи тему во флейме...

Решение как таковое:

1. Найти файл anEnv.pm;
2. В скрипте прописать:
use lib \'[абсолютный(!) путь папки где лежит anEnv.pm]\';
3. И нефиг его копировать в одну из папок массива @INC.

22

Perl / Как заставить *.bat запустить скрипт на perl?

« : 06 Июня 2007, 13:12:43 »

arto
1. Что хранится в @INC? И возможно ли в @INC добавить отдельный модуль?
Кстати, ты своей командной строкой модуль не в @INC запихивал а вызывал первый элемент этого массива, что бы определить путь.
Смекаешь?

2. И того

3. Когда он начнет вызывать методы этого модуля.

P.S. Я знаю что делает use lib, а ты?

23

Базы данных / Умный SQL запрос

« : 06 Июня 2007, 12:15:24 »

DartSidius

Ужос... это Вы называете одним запросом? Я вижу 2 селекта как минимум, даже не считая того, что селект вложеный...

А вот так работает IF

SELECT t1.*, t2.*, IF(t1.author = 0, \'Y\', \'N\') AS anonimnus
FROM table1 t1 LEFT JOIN table2 t2 ON t1.author = t2.id;

24

Perl / Как заставить *.bat запустить скрипт на perl?

« : 06 Июня 2007, 12:00:29 »

arto
1.
А я не сказал, что работать не будет.
Вопрос не в работоспособности, а в философии.
Свои собственные модули, предназначенные для одного проекта выкладывать в одну из папок(!) @INC - не совсем правильно.
Тем паче, как это сделал ты. :-)

2.
в @INC хранится список папок где расположены модули, точнее где Perl их будет искать.
Я для тебя америку открыл? Нет, а вот товарищу который вопрос задал - да.

3. Товарищу perl novice совсем не поможет твой код, уверен, что он просто скопирует его себе в командную строку. Да... ошибка первая у него пропадет, но породит кучу остальных...

Медвежью услугу оказываете товарисч...

25

Perl / Как заставить *.bat запустить скрипт на perl?

« : 04 Июня 2007, 17:21:41 »

arto

Остроумно, но не правильно...

perldoc lib

P.S. В @INC ты его реально не занес, оценка - 2

26

Perl / Как заставить *.bat запустить скрипт на perl?

« : 01 Июня 2007, 18:19:47 »

arto

наверное у вас нет anEnv.pm в @INC.
поставте его.

Не надо пользователей в заблуждение вводить...
Ты сам-то сможешь в @INC его занести?

perl novice
У тебя просто нет модуля anEnv.pm, либо в скрипте не прописан use lib к папке где он лежит...

27

Perl / Перевод

« : 01 Июня 2007, 18:14:20 »

Biggelow

$val=~s/%([0-9A=Ha-h]{2})/pack(\'C\',hex($1))/ge;

Может скажешь что пишет error_log?

28

Базы данных / Умный SQL запрос

« : 01 Июня 2007, 18:11:34 »

"И вы еще спрашиваете, а при чем здесь Perl?..."

База данных какая?

29

Perl / DBI

« : 01 Июня 2007, 18:08:46 »

я их объединяю посредством id и LEFT JOIN

Это значит что id у тебя одинаковы? да?

30

Perl / Image::Magick , CROP & Gif

« : 25 Мая 2007, 17:24:35 »

DartSidius
Нет, более ранние версии не совсем корректно делали процедуру обрезки изображений GIF 24bit