помогите с "Can't locate IO/Socket/SSL.pm in" пробывал как написал (KSURi::: perl -MCPAN -e "install IO::Socket::SSL") непомогло(( вот нашел search.cpan.org/~sullr/IO-Socket-SSL-1.18/SSL.pm что дальше делать подскажите??
короче есть спамер на перле одноклашек, он отправляет токо 20 друзьям сообщения и закрывается, что может быть? есть антикапча скрипт обрашается к anti-captcha.ru по деньги от туда не снимаются
Народ . Прошу помочь. Проблема пустяковая но просто не могу понять в чем дело. Задача такая : Есть 2 файла. В одном Шаблоны для поиска(file1), во втором Текстовый файл в котором нужно непосредственно производить поиск (file2). Почему то выполняется поиск только по первому шаблону. Перепробывал кучу написаний с циклами масивами и т.д. Не могу понять в чем дело.
Или так сначала так cpan потом так i/Socket/ потом install (то что подойдет тебе) P.S. Ответьте плиз на мой пост
constanta Code: #!/usr/bin/perl -w open file1,"1.txt" or die qq {cannot read "$file1":$!}; open file2,"2.txt" or die qq {cannot read "$file2":$!}; @lines = <file2>; @patterns = <file1>; for($i=0;$i<=$#lines;$i++) { for($k=0;$k<=$#patterns;$k++) { $str = $patterns[$k]; $str=~s/\n|\r$//g; if ($lines[$i] =~ /$str/) { print $lines[$i]; } } }
Так не работает. А во вторых File2 достаточно большого объема в среднем около 40-60 мб. Мне кажется засовывать такой файл в массив будет опрометчиво (ИМХО). Я делал вот так : Но опять же поиск в file2 почему то шел только по нулевому значению @array. Остальные читались но по ним поиск не шел. Я хз в чем дело. ХЕЛП !!! P.S. Ищет то оно у меня правильно . Именно так как надо ! Но почему только по первому значению массива ??? Почему следующие значения во второй цикл не подставляет ?
сорри но не представляю как это можно использовать в данном случае. З.Ы. Я вообще не могу понять почему во втором цикле не выполняется следующая строка файла с шаблонами. Народ подскажите хотя бы в какую сторону копать. Что это может быть ?Если Print сделать первого файла то выводит полностью все шаблоны. А вот какого то не пихается во второй цикл вторая и ниже строки. Я хз. З.Ы З.Ы З.Ы Всем спасибо. Разобрался почему не работал должным образом скрипт. Все дело в неправильном (несвоевременном ) закрытии file2(должен закрываться внутри первого цикла.Как впрочем и открываться).
[dei] -> если ppm> install "IO::Socket::SSL" Error: No valid repositories: Error: 500 Can't connect to ppm.ActiveState.com:80 (Bad hostname 'ppm.ActiveState.com') Error: 500 Can't connect to ppm.ActiveState.com:80 (Bad hostname 'ppm.ActiveState.com') а если : ....\IO-Socket-SSL-1.18>perl Makefile.PL то пишет: WARNING No library for handling international domain names found. It will work but croak if you try to verify an international name against a certificate.It's recommended to install either Net::IDN::Encode or Net::LibIDN Warning: prerequisite Net::SSLeay 1.21 not found. Writing Makefile for IO::Socket::SSL или .........\IO-Socket-INET6-2.56>perl Makefile.PL Warning: prerequisite Socket6 0.12 not found. Writing Makefile for IO::Socket::INET6 короче чем глубже , в лес тем толще партизаны((( помогите !! может где есть перл уже со всеми либами или выложите кто нить свой .... джентельменский набор ))) заранее благодарен
DarkMist, с офф сайта скачат послед. версию потом: пуск - виполнить - cmd - ppm и там напиши: IO вибери модуль Socket::SSL и установи..
Да я вообще не понимаю в чем проблема? пользуйся cpan да и все. Там есть все что нужно и даже больше. Для ppm еще репозитории искать нужно , а в cpan все есть.
Здравствуйте народ. В очередной раз обращаюсь к вам за помощью. Такой вопрос : Есть текстовый файл (большого объема) в текстовом файле скрипт находит по шаблону определенное слово и выводит строку с этим словом. Внимание вопрос ! Как сделать так что бы вместо одной строки скрипт выводил тестовый блок в котором присутствует эта строка ? Например: есть шаблон dddddd В текстовом файле есть блок с таким текстом Задача вывести вот этот блок : Прошу ответить на мой пост. P.S. Не против за дельный совет дать чуток вмз.
constanta, чтобы сделать что-то подобное, нужно сначала определиться, каким образом выделяются блоки текста, в которых надо найти слово по шаблону.(будет ли это перенос строки, тег или какой-то спецсимвол). Затем все просто: 1) ищешь начало и конец блока текста (первого или очередного), выделяешь=запоминаешь его. 2) в выделенном блоке ищешь слово по шаблону, если нашел выводишь блок. 3) переходишь к 1-му пункту. Если есть вопросы, пиши. Если проблемы с выделением блока текста, давай пример текста, поможем.
скажите плз для версии IPB в сплоите "exploit" написанно это ,как это расшифровать или понять что это $pass_hash1 = "%*36%*36%*36%2527%20%*4F%*52%20%28%*69%*64%3D"; $pass_hash2 = "%20%*41%*4E%*44%20%*61%*73%*63%*69%*69%28%*73%*75%*62%*73%*74%*72%*69%*6E%*67%28"; $pass_hash3 = $pass.",".$s_num.",1))".$ccheck.") /*"; вообщем как пишутся такие хеши на перле...
когда нужно указывать line а когда print, а то вроде и то и то подходит а когда пишу line не всегда работает?
