Сообщения

31

Поиск Работы / HTML, PHP, MySQL под заказ (Санкт-Петербург)

« : 25 Мая 2007, 12:35:22 »

Класс...
Вышел на первый сайт в списке

http://saint-petersburg-apartments.com/en/mini-hotels/index.html

Хотел посмотреть как бронируются номера, а ссылка-то [Reservations] не работает...

P.S. Я смотрю, что тут не вакансия, а тестирование...
P.S.S. А автору я бы посоветовал портфолио в порядок привести.

32

Perl / Image::Magick , CROP & Gif

« : 25 Мая 2007, 12:14:14 »

DartSidius
Версию модуля на хосте проверь, наверняка 5.7.x

33

Perl / Функция rand ...

« : 25 Мая 2007, 12:00:56 »

vladsu

for (1..10){
   print int rand(100)-rand(100),"\\n";
}

Это еще зачем?

print int rand(200) - 100,"\\n";

34

Perl / При uploade скрипт сохраняет tmp

« : 25 Мая 2007, 11:56:24 »

Error202

У меня вылечилось:

open (OUT, \'>\', $name); # Лучше так
binmode(OUT);  
while(<$spic> ) {  print OUT $_; }  
close(OUT);
close($name);

А вообще за CGI наблюдалось, что мусор под виндой оставляет, попробуй еще метод DESTROY выхывать принудительно. Хотя вышеуказанный код мне помог...

35

Perl / Перевод ключевых слов

« : 25 Мая 2007, 11:50:59 »

Error202

Что значит перевод?
Транслит или просто ошибочный ввод киррилических символов в английской раскладке?

36

Perl / Вызов функции

« : 23 Ноября 2006, 09:41:17 »

DartSidius

тогда можно просто изклекать то что между ("") и удалять ненужное

Ты уверен, что это правильно?

37

Базы данных / Описание коментов к полю

« : 22 Ноября 2006, 19:34:09 »

kiruxa

Может все-таки http://dev.mysql.com/doc/refman/5.1/en/show-columns.html ?

Не забыть обратить внимание на FULL

38

Perl / Как преобразовать дату?

« : 22 Ноября 2006, 19:20:34 »

Руками:

e.q.

my %month = (\'января\' => \'01\', \'февраля\' => \'02\', ... и т.д. ... );
my $date = \'21 ноября 2006\';
$date =~s /^(\\d+)\\s+(.+)\\s+(\\d+)$/$1\\.$month{$2}\\.$3/i;

39

Perl / РЕДАКТИРОВАНИЕ ФАЙЛА

« : 22 Ноября 2006, 19:12:20 »

http://search.cpan.org/~ams/Storable-2.15/Storable.pm

40

Perl / Вызов функции

« : 22 Ноября 2006, 19:11:07 »

DartSidius

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

&{$a}($b);

41

Perl / Кто-нибудь может объяснить?

« : 21 Ноября 2006, 18:39:01 »

arto
Ну и что? причем здесь вычисление и то, что он возвращает

На самом деле нет... уже разобрались, так и должно быть...

42

Perl / Кто-нибудь может объяснить?

« : 21 Ноября 2006, 14:27:15 »

arto
Умно... что он делает и так понятно...
Он должен последовательно обрабатывать список и выдавать соответствующие значения для элемента списка, но он это не делает...
Вопрос: почему?

43

Perl / Кто-нибудь может объяснить?

« : 20 Ноября 2006, 16:50:35 »

arto
Результатом операции приравнивания должен быть значение справа от знака равенства...

my $i;
print $i = 0;
print $i = 1;
print $i = 2;

Выдаст:

012

Но в списочном контенте, почему-то все результаты равенства становятся равным последнему элементу...

Вопрос: почему так?

44

Perl / Кто-нибудь может объяснить?

« : 20 Ноября 2006, 15:52:41 »

arto
Ну и что? результат:
333
3

А я, как бы, предполагаю:
123
3

45

Perl / Кто-нибудь может объяснить?

« : 17 Ноября 2006, 21:11:38 »

> perl -e \'print ($i = 1, $i = 2, $i = 3, "\\n")\'
333
>