ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
23.02.2008, 00:49
|
|
Постоянный
Регистрация: 30.08.2007
Сообщений: 773
Провел на форуме:
3069349
Репутация:
808
|
|
|
|
|
23.02.2008, 01:07
|
|
Banned
Регистрация: 06.06.2006
Сообщений: 944
Провел на форуме:
3986705
Репутация:
1403
|
|
Типо того?
PHP код:
#!/usr/bin/perl
@array = ('apple','asdas','123123d','sda2122d12','sad12d12e','tomato','orange'); #Создаем массив
$size = @array; #Получаем размер массива
$str = 'tomato'; #Строку по которой ищем индекс
for ($i=0;$i<$size;$i++) {
if ($str eq $array[$i]) {
print "Index of $str : ".$i;
}
}
|
|
|
|
23.02.2008, 01:11
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
спасибо ребята всем +5
|
|
|
|
23.02.2008, 22:06
|
|
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540
Репутация:
96
|
|
простенький вопрос . В общем я скачиваю хтмл страничку и выдергиваю все от тега до тега - все ок НО выдергивается только один раз , нужен цикл , как реализовать ?
КОД :
open(FIL,">sait.txt");
@loleg=$content =~m {<[<th>]+/?>(.+?)</?[\/th]+>};
print FIL @loleg;
|
|
|
|
23.02.2008, 22:16
|
|
Banned
Регистрация: 11.08.2006
Сообщений: 1,522
Провел на форуме:
5128756
Репутация:
2032
|
|
Сообщение от $p01nt
простенький вопрос . В общем я скачиваю хтмл страничку и выдергиваю все от тега до тега - все ок НО выдергивается только один раз , нужен цикл , как реализовать ?
КОД :
open(FIL,">sait.txt");
@loleg=$content =~m {<[<th>]+/?>(.+?)</?[\/th]+>};
print FIL @loleg;
open(FIL,">sait.txt");
@loleg=$content =~m {<[<th>]+/?>(.+?)</?[\/th]+>}g;
my $i = 0;
foreach $line (@loleg) { $lolarr[$i] = $line; $i++;}
print FIL @loleg;
Последний раз редактировалось Piflit; 23.02.2008 в 22:32..
|
|
|
|
23.02.2008, 23:17
|
|
Banned
Регистрация: 22.08.2006
Сообщений: 608
Провел на форуме:
6144796
Репутация:
1095
|
|
>> foreach $line (@loleg) { $lolarr[$i] = $line; $i++;}
можно поинтересоваться, в чем заключается глубинный смысл этой строки ? +)
|
|
|
|
23.02.2008, 23:22
|
|
Banned
Регистрация: 11.08.2006
Сообщений: 1,522
Провел на форуме:
5128756
Репутация:
2032
|
|
Сообщение от Digimortal
>> foreach $line (@loleg) { $lolarr[$i] = $line; $i++;}
можно поинтересоваться, в чем заключается глубинный смысл этой строки ? +)
if($i == 1){$i = 1;}
ммм... узнаем длину массива... хз)
|
|
|
|
23.02.2008, 23:27
|
|
Banned
Регистрация: 22.08.2006
Сообщений: 608
Провел на форуме:
6144796
Репутация:
1095
|
|
>> ммм... узнаем длину массива... хз)
и для этого ты создал еще один масив и переложил в него в цикле по одному все элемены массива, чтоб пересчитать их ??
/me ф шоке, честно говоря.. ))
з.ы. длина массива = scalar @massiv
+)
|
|
|
|
24.02.2008, 11:39
|
|
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540
Репутация:
96
|
|
сори народ я протупил , нужно было параметр g (глобальный поиск) использовать .
@loleg=$content =~m {<[<th>]+/?>(.+?)</?[\/th]+>}g;
|
|
|
|
24.02.2008, 14:45
|
|
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540
Репутация:
96
|
|
и еще один вопросик от меня . авторизируюсь на сайте xaker.ru , с авторизацией вроде все ок . Как получить урл на который меня перебрасывает после авторизации ?
http://paste.org.ru/?j8xlt9
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
