13.04.2007, 20:32
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
С нами:
10489346
Репутация:
963
|
|
да на*** вы чето в регесп суете, если человек говорит, что ему тупо надо числа эти в файл забросить?
Код:
# $html - тут сорец страницы
my @nums = $html =~ /\d+/g;
open(OUT, '>', 'out.txt') || die $!;
print OUT join("\n", @nums);
close OUT;
|
|
|