ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

13.08.2008, 22:26
|
|
Members of Antichat - Level 5
Регистрация: 24.10.2007
Сообщений: 256
Провел на форуме: 6905523
Репутация:
1174
|
|
Сообщение от m0nzt3r
Ещё вопрос, можно ли использовать переменную в регулярке?
Пример: $s =~ /$regex/
можно
|
|
|

13.08.2008, 22:35
|
|
ветеран
Регистрация: 22.06.2004
Сообщений: 2,128
Провел на форуме: 5355463
Репутация:
2258
|
|
ну а что тут показывать?)
ну:
Код:
$num = 0;
$regex = '<input type="radio" id="cb'.$num.'" name="cid\[\]" value="(.+?)"';
$res->content =~ /$regex/;
print $1;
так? 
__________________
Моня тот еще зверюга,
Свиду тихий внутри - ****,
Без обид,реальный мэн,
Просто рифмы нет совсем.
С ним шутить *****то очень,
В ирце вместе с ним хохочем (c) m0Hze
Последний раз редактировалось m0nzt3r; 13.08.2008 в 22:45..
|
|
|

13.08.2008, 22:40
|
|
Reservists Of Antichat - Level 6
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
Пример
$bm =~ s/<name>/$name/g;
|
|
|

13.08.2008, 22:43
|
|
Members of Antichat - Level 5
Регистрация: 24.10.2007
Сообщений: 256
Провел на форуме: 6905523
Репутация:
1174
|
|
Код:
#!/usr/bin/perl
use strict;
my $s = 'bla-x3k-bla';
my $regex = "-(.+)-";
$s=~/$regex/;
print $1."\n";
|
|
|

14.08.2008, 15:35
|
|
Участник форума
Регистрация: 23.04.2007
Сообщений: 233
Провел на форуме: 671223
Репутация:
91
|
|
$num = 0;
$regex = qr[<input type="radio" id="cb'.$num.'" name="cid\[\]" value="(.+?)"];
$res->content =~ $regex;
print $1;
|
|
|

16.08.2008, 17:38
|
|
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме: 584540
Репутация:
96
|
|
my $arr=system(ls);
my @xx=split(' ',$arr);
print @xx;
получаю список папок в скляр, теперь мне надо что бы в массиве были эти данные, НО не все папки в одном значение (т.е. $xx[0]=все) а $xx[0]=первая папка. Как сделать?
|
|
|

16.08.2008, 18:23
|
|
Участник форума
Регистрация: 11.05.2007
Сообщений: 149
Провел на форуме: 6373157
Репутация:
247
|
|
Сообщение от $p01nt
my $arr=system(ls);
my @xx=split(' ',$arr);
print @xx;
получаю список папок в скляр, теперь мне надо что бы в массиве были эти данные, НО не все папки в одном значение (т.е. $xx[0]=все) а $xx[0]=первая папка. Как сделать?
Код:
#!/usr/bin/perl
use Data::Dumper;
print Dumper split ' ',`ls`
|
|
|

18.08.2008, 06:45
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме: 3660186
Репутация:
905
|
|
opendir/readdir/closedir
|
|
|

18.08.2008, 18:55
|
|
Постоянный
Регистрация: 13.10.2007
Сообщений: 347
Провел на форуме: 1345617
Репутация:
115
|
|
Впервые пытаюсь апустить скрипт.. в чем проблема http://4iks.ru/cgi-bin/drug.pl ? скрипт добавления в друзья http://forum.antichat.ru/showpost.php?p=786700&postcount=136 как правильно запустить скрипт?
Если можно расскажите подробней!
Последний раз редактировалось .::BARS::.; 18.08.2008 в 18:59..
|
|
|

19.08.2008, 04:35
|
|
Постоянный
Регистрация: 13.10.2007
Сообщений: 347
Провел на форуме: 1345617
Репутация:
115
|
|
ТО есть я могу его запустить на топсервере, на винде?
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|