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

13.04.2007, 21:22
|
|
Участник форума
Регистрация: 05.09.2006
Сообщений: 184
Провел на форуме: 888851
Репутация:
203
|
|
Код:
#/usr/bin/perl -w
open(FIL, "<file.html");
open(SUC, ">SUCCESS.txt");
@fil=<FIL>;
foreach $str(@fil) {
if ($str=~m/<a href="\/album\/(\d+)\/"/) {
push (@URLS,"$1\n");
}}
print SUC @URLS;
close (FIL);
close (SUC);
ps: подпись у топикстартера прикольная 
|
|
|

13.04.2007, 22:23
|
|
Banned
Регистрация: 12.01.2007
Сообщений: 113
Провел на форуме: 4094601
Репутация:
495
|
|
Сообщение от flipper
ps: подпись у топикстартера прикольная 
ну плин перл учу месяц-немогу понять я эти регулятивные выражения, а услуги спэма предоставляю добросовисно 
|
|
|

14.04.2007, 00:04
|
|
Постоянный
Регистрация: 23.04.2006
Сообщений: 622
Провел на форуме: 5887054
Репутация:
1292
|
|
Сообщение от KSURi
да на*** вы чето в регесп суете, если человек говорит, что ему тупо надо числа эти в файл забросить?
Код:
# $html - тут сорец страницы
my @nums = $html =~ /\d+/g;
open(OUT, '>', 'out.txt') || die $!;
print OUT join("\n", @nums);
close OUT;
А теперь немного подумаем? Сколько циферок оно соберёт на странице типа:
PHP код:
<td><input type="radio" name="iconid" value="12" id="rb_iconid_12" tabindex="1" onclick="swap_posticon('pi_12')" /></td>
<td width="12%"><label for="rb_iconid_12"><img src="images/icons/icon12.gif" alt="Wink" id="pi_12" onclick="rb_iconid_12.click()" /></label></td>
<td><input type="radio" name="iconid" value="11" id="rb_iconid_11" tabindex="1" onclick="swap_posticon('pi_11')" /></td>
<td width="12%"><label for="rb_iconid_11"><img src="images/icons/icon11.gif" alt="Red face" id="pi_11" onclick="rb_iconid_11.click()" /></label></td>
<td><input type="radio" name="iconid" value="10" id="rb_iconid_10" tabindex="1" onclick="swap_posticon('pi_10')" /></td>
<td width="12%"><label for="rb_iconid_10"><img src="images/icons/icon10.gif" alt="Talking" id="pi_10" onclick="rb_iconid_10.click()" /></label></td>
<td><input type="radio" name="iconid" value="9" id="rb_iconid_9" tabindex="1" onclick="swap_posticon('pi_9')" /></td>
<td width="12%"><label for="rb_iconid_9"><img src="images/icons/icon9.gif" alt="Unhappy" id="pi_9" onclick="rb_iconid_9.click()" /></label></td>
А ведь ему явно задано, что циферки должны находиться внутри href
Код:
$xxx = '
<td><a href="/users/1456031/"id="good">Username</a></td>;
<td><a href="/users/1456032/"id="good">Username</a></td>;
<td><a href="/users/1456033/"id="good">Username</a></td>;
';
@yyy = $xxx =~ m#<a href="/users/(\d+)/"#gi;
open(OUT, '>', 'out.txt')|| die $!;
print OUT join "\n", @yyy;
close OUT;
Так и просто, и правильно.
|
|
|

14.04.2007, 00:18
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
Провел на форуме: 1985206
Репутация:
963
|
|
Сообщение от hidden
А теперь немного подумаем? Сколько циферок оно соберёт на странице типа:
PHP код:
<td><input type="radio" name="iconid" value="12" id="rb_iconid_12" tabindex="1" onclick="swap_posticon('pi_12')" /></td>
<td width="12%"><label for="rb_iconid_12"><img src="images/icons/icon12.gif" alt="Wink" id="pi_12" onclick="rb_iconid_12.click()" /></label></td>
<td><input type="radio" name="iconid" value="11" id="rb_iconid_11" tabindex="1" onclick="swap_posticon('pi_11')" /></td>
<td width="12%"><label for="rb_iconid_11"><img src="images/icons/icon11.gif" alt="Red face" id="pi_11" onclick="rb_iconid_11.click()" /></label></td>
<td><input type="radio" name="iconid" value="10" id="rb_iconid_10" tabindex="1" onclick="swap_posticon('pi_10')" /></td>
<td width="12%"><label for="rb_iconid_10"><img src="images/icons/icon10.gif" alt="Talking" id="pi_10" onclick="rb_iconid_10.click()" /></label></td>
<td><input type="radio" name="iconid" value="9" id="rb_iconid_9" tabindex="1" onclick="swap_posticon('pi_9')" /></td>
<td width="12%"><label for="rb_iconid_9"><img src="images/icons/icon9.gif" alt="Unhappy" id="pi_9" onclick="rb_iconid_9.click()" /></label></td>
А ведь ему явно задано, что циферки должны находиться внутри href
Код:
$xxx = '
<td><a href="/users/1456031/"id="good">Username</a></td>;
<td><a href="/users/1456032/"id="good">Username</a></td>;
<td><a href="/users/1456033/"id="good">Username</a></td>;
';
@yyy = $xxx =~ m#<a href="/users/(\d+)/"#gi;
open(OUT, '>', 'out.txt')|| die $!;
print OUT join "\n", @yyy;
close OUT;
Так и просто, и правильно.
Незабываем, что первоначальное задание было в одной строке, с одной парой цифр. По нему я и писал.
|
|
|

14.04.2007, 00:21
|
|
Постоянный
Регистрация: 23.04.2006
Сообщений: 622
Провел на форуме: 5887054
Репутация:
1292
|
|
Сообщение от KSURi
Незабываем, что первоначальное задание было в одной строке, с одной парой цифр. По нему я и писал.
Так-же не пропускаем 7-ой пост 
|
|
|

14.04.2007, 00:28
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
Провел на форуме: 1985206
Репутация:
963
|
|
Сообщение от hidden
Так-же не пропускаем 7-ой пост 
Не читал, тк "зае*** порционно выдавать" =\
Последний раз редактировалось hidden; 14.04.2007 в 00:34..
Причина: Мат
|
|
|

14.04.2007, 00:49
|
|
Banned
Регистрация: 12.01.2007
Сообщений: 113
Провел на форуме: 4094601
Репутация:
495
|
|
Ребята спасибо помогли разобрался 
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|