Темы

226

Perl / поиск по шаблону

« : 26 Марта 2005, 21:48:02 »

 
 $i=0;
 foreach (@all)
 {
  $i++;  if (m/text1/g)
  {
   $j++;
   if  (m/text2/g) { print FF "Строка: $j\\n";};
  };
...


ALL - массив строк

Из массива АЛЛ выбираются строки, где есть ТЕКСТ1, затем увеличивается на единицу счетчик J. Если в строке есть ТЕКСТ2, то записать в файл данные...

Почему проверка на ТЕКСТ2 не работает?
В строке есть ТЕКСТ2, но программа этого не видит...

227

Интернет реклама / Индекс цитирования

« : 20 Марта 2005, 10:09:58 »

Почему ссылащихся страниц на мой сайт всего 143, а Яндекс показывает в ИЦ 190?

228

PHP / Переменные

« : 06 Марта 2005, 17:56:07 »

На перле есть возможность:

@Var=QQ {произвольный многострочный текст};


Есть ли аналог на PHP?

P.S. HERE DOC не подходит...

229

Perl / Не создаются Cookie

« : 19 Февраля 2005, 11:39:00 »

Код: [Выделить]


$cook=cookie( -name    => \'test\',
                      -value   => \'ok\',
                      -expires => \'+1y\');

print charset(\'Windows-1251\');
print header(-cookie => $cook);


Почему не создаются cookie?

230

Perl / MySQL - количество рядов...

« : 17 Февраля 2005, 17:52:21 »

$sth = $dbh->prepare(qq{ SELECT id FROM fc_users});
$sth->execute();
$sth->finish();

$sth = $dbh->prepare(qq{select found_rows()});
   $sth->execute();
my $uscount=$sth->fetchrow_array();
   $sth->finish();

Почему $uscount не содержит количества строк таблица fc_users?

231

Perl / Регулярные выражения

« : 29 Января 2005, 00:20:19 »

Есть коды, встречающиеся в строке текста (указаны по порядку их проверки и замены на другой текст):

1. $01,02; $15,4; $12,10
2. $01; $15; $2
3. $

$(\\d{0,2})(,?)(\\d{0,2})

Правильное ли для их проверки регулярное выражене?

По этому выражению проходит замена указанных кодов, но код типа $01212 не обрабатывается...
Что надо подправить?

232

ОС и системное ПО / IE под Windows XP

« : 22 Декабря 2004, 22:53:10 »

Можно ли:
1. Прописать где-нть в реестре что-нть для того, чтобы по ссылке в тексте страницы типа sss://domain.ru браузер перенаправлял посетителя (т.е. подменял sss:// на http://)?
2. Вводить русский текст в адресной строке (опять же прописав чего-нть)?
3. Где лежит MSN.COM, который грузится в случае неверно введенного адреса, в том числе и на русском языке...?

Спасибо

233

Perl / Как перевести 01010100 в символ на ПЕРЛе?

« : 17 Декабря 2004, 10:03:34 »

Как перевести 01010100 в символ на ПЕРЛе? :confused:

234

Perl / source mangling

« : 16 Декабря 2004, 15:53:39 »

Где найти программку для САБЖа для скриптов, написанных не перле?

235

Perl / Права доступа

« : 07 Декабря 2004, 18:38:01 »

Спасибо за ответ...
Каждый раз поражаюсь гостеприимством...

236

Perl / JavaScript - Perl - MySQL = ничему не равно

« : 17 Ноября 2004, 14:16:34 »

Господа! Здравствуйте!

Возникла такая проблема:

В форме (точнее TEXTAREA), набирают html код с JavaScriptом. Затем по кнопке отправить ПЕРЛ вытягивает запрос с помощью param(\'name\') модуля CGI. Все это приравнивается переменной и отправляется в базу MySQL... Точнее должно отправляться... Если html код без java наворотов, то текст сохраняется нормально, в противном случае вообще ничего не сохраняется...
Что можно с эти сделать?