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

01.04.2009, 22:00
|
|
Members of Antichat - Level 5
Регистрация: 15.06.2008
Сообщений: 941
Провел на форуме: 5111568
Репутация:
2399
|
|
$com = ($answ =~ /Коментарии <i>\((\d+)\)<\/i>/);
|
|
|

01.04.2009, 22:53
|
|
Участник форума
Регистрация: 12.03.2008
Сообщений: 159
Провел на форуме: 912928
Репутация:
137
|
|
Код:
my $name = $1 if $answ=~/<a href="\/users\/12\">(\S+)<\/a>/;
my $com = $1 if $answ =~/Комментарии <i>\((\d+)\)<\/i>/;
printf "$name"."$com"
Ник мой он мне отдает, а комментарии нет.
Попробовал два варианта ниже, ничего 
|
|
|

01.04.2009, 23:01
|
|
Новичок
Регистрация: 03.11.2007
Сообщений: 9
Провел на форуме: 61379
Репутация:
12
|
|
У меня работает
if(/Комментарии.+\((\d+)\)/) {print $1 . "\n"; }
|
|
|

01.04.2009, 23:09
|
|
Познающий
Регистрация: 14.01.2009
Сообщений: 93
Провел на форуме: 244235
Репутация:
39
|
|
Сообщение от zavra
Код:
my $name = $1 if $answ=~/<a href="\/users\/12\">(\S+)<\/a>/;
my $com = $1 if $answ =~/Комментарии <i>\((\d+)\)<\/i>/;
printf "$name"."$com"
Ник мой он мне отдает, а комментарии нет.
Попробовал два варианта ниже, ничего 
у тебя проблемы с кодировками, вызванные тем, что в первом регексе нету русских букв, а во втором - есть. сделай файл в утф8, пропиши в начале use utf8, юзай Encode чтобы сконвертить пагу в нужную кодировку, если сам не разберешься, скинь сюда нужный урл
|
|
|

02.04.2009, 03:29
|
|
Участник форума
Регистрация: 12.03.2008
Сообщений: 159
Провел на форуме: 912928
Репутация:
137
|
|
Сообщение от roddikюзай Encode чтобы сконвертить пагу в [B
нужную [/B]кодировку,
страница-то и есть в утф8( а в какую "нужную"?
|
|
|

02.04.2009, 06:22
|
|
Новичок
Регистрация: 24.01.2007
Сообщений: 18
Провел на форуме: 103494
Репутация:
9
|
|
cp-1251 по идее...как там пишется нипомню...
|
|
|

02.04.2009, 12:55
|
|
Познающий
Регистрация: 14.01.2009
Сообщений: 93
Провел на форуме: 244235
Репутация:
39
|
|
Сообщение от zavra
страница-то и есть в утф8( а в какую "нужную"?
а в какой сорцы?
|
|
|

02.04.2009, 16:12
|
|
Участник форума
Регистрация: 12.03.2008
Сообщений: 159
Провел на форуме: 912928
Репутация:
137
|
|
Сообщение от roddik
а в какой сорцы?
в утф-8
|
|
|

02.04.2009, 16:40
|
|
Познающий
Регистрация: 14.01.2009
Сообщений: 93
Провел на форуме: 244235
Репутация:
39
|
|
Сообщение от zavra
в утф-8
стоит use utf8 в начале?
|
|
|

02.04.2009, 17:04
|
|
Участник форума
Регистрация: 12.03.2008
Сообщений: 159
Провел на форуме: 912928
Репутация:
137
|
|
Malformed UTF-8 character (unexpected non-continuation byte 0xee, immediately af
ter start byte 0xca) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xec, immediately af
ter start byte 0xee) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xec, immediately af
ter start byte 0xec) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately af
ter start byte 0xec) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xed, immediately af
ter start byte 0xe5) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xf2, immediately af
ter start byte 0xed) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xe0, immediately af
ter start byte 0xf2) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xf0, immediately af
ter start byte 0xe0) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xe8, immediately af
ter start byte 0xf0) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0xe8, immediately af
ter start byte 0xe8) at test2.pl line 19.
Malformed UTF-8 character (unexpected non-continuation byte 0x2e, immediately af
ter start byte 0xe8) at test2.pl line 19.
вот что пишет с use utf8
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|