Показать сообщение отдельно

  #8  
Старый 21.04.2010, 00:09
Fepsis
Постоянный
Регистрация: 17.09.2008
Сообщений: 562
С нами: 9288386

Репутация: 536


По умолчанию

$resp =~/\"\>Друзья \((.+?)\)\<\/a\>/;
my ($frend) = $1;
print $frend;
 
Ответить с цитированием