Сообщения

1

Perl / Ввод данных в командной строке

« : 11 Сентября 2003, 16:51:30 »

К сожалению, не подошел ни один ответ, т.к. эти модули не доступны под винды. Я имел ввиду ввод пароля именно в командной строке Windows (почему не через control - отджельный разговор).
А проблема такая: есть скрипт, который использует DBI для коннекта к базе. А в методе DBI->connect("$dbname", $user, $passwd) пароль надо указывать "как есть", что не подходит. Вот и возникла идея запрашивать у пользователя ввод пароля, не показывая его.
Кто что посоветует?

2

Perl / Ввод данных в командной строке

« : 02 Сентября 2003, 10:26:44 »

Есть ли возможность в Perl вводить данные с клавиатуры в , не видя вводимые символы (наподобие парольного контрола в Windows)?

3

Perl / Запрос скриптом по https + сертификация

« : 17 Июня 2003, 10:19:15 »

Цитата из книги Линкольна Штайна "Разработка сетевых программ на Perl" (глава по LWP): "Для использования протокола HTTPS (защищенного протокола HTTP) необходимо установить один из модулей SSL языка Perl, IO::Socket::SSL, а также OpenSSL, библиотеку SSL с открытым исходным кодом, необходимую для работы модуля IO:Socket::SSL. Библиотеку OpenSSL можно получить по адресу http://www.openssl.org".

4

Perl / подпрограммы

« : 22 Мая 2003, 14:12:42 »

Надо написать так:

unshift(@INC,"/path/vars.pl");
require “vars.pl”;

где path - точный путь (например /usr/temp/perllib)

И еще: в конце файла vars.pl поставь 1;

5

Perl / Ошибка:( Помогите, плиз, очень срочно

« : 30 Апреля 2003, 13:04:44 »

Проблема в том, что у тебя получается символическая ссылка.
Цитата из "Advanced Perl Programming":
--------------------------------------
The strict pragma tells Perl to do strict error checking. You can even enumerate specific aspects to be strict about, one of which is `refs\':

use strict \'refs\';  # Tell Perl not to allow symbolic references
$var = "x";
$$var = 30;
This results in a run-time error whenever you try to use a symbolic reference:

Can\'t use string ("x") as a SCALAR ref while "strict refs" in use at try.pl line 3
The strict directive remains in effect until the end of the block. It can be turned off by saying no strict or, more specifically, no strict \'refs\'.
--------------------------------------

6

Веб Сервера / Пытаюсь сохранить тexт в файл.....

« : 17 Марта 2003, 18:00:49 »

У меня работает, т.е. в файл data.txt пишется "blia+blia+blia" и потом это же выводит броузер.
Так что вопрос наверное к спецам IIS. Хотя может проблема и при работе с файлами на запись.

7

Веб Сервера / Пытаюсь сохранить тexт в файл.....

« : 17 Марта 2003, 17:15:22 »

Теперь интересно было бы узнать, как ты его вызываешь по http.

8

Perl / дата. Разница в часовых поясах

« : 13 Марта 2003, 09:33:43 »

В JavaScript у объекта Date есть метод getTimezoneOffset.
Цитата с http://wdh.suncloud.ru/js11.htm#mgettimezoneoffset :

=========================
"Метод getTimezoneOffset возвращает разницу в минутах между временем UTC и местным временем (т. е. временем компьютера, на котором выполняется сценарий). Из-за переходов на летнее и зимнее время эта разница в течение года может изменяться. Для перевода местного времени в UTC следует прибавить к нему полученное значение.

Если, например, следующий сценарий

var today = new Date();
document.write(today.getTimezoneOffset() / 60);

выполняется на компьютере, находящемся в Екатеринбурге, то он выведет на экран обозревателя число -6. Это означает, что время в Екатеринбурге на 6 часов больше, чем UTC."
=========================

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

9

Perl / Как отключить распознование переменных перлом при выводе строк

« : 12 Марта 2003, 11:32:09 »

Кстати, если написать

print \'SDFSDF2345!@#!@$#$%
R34r@#$
rfc#e@
t%^#%^@$r@xdewrewer#@$\';

т.е. в одинарных кавычках, то на один символ меньше станет, а работать все-равно будет:)