senator
Guest
ужасы да и только...
Ну типа поиского робота паука ,)Автор оригинала: StUV
admin
не, серьезно - что подразумевалось под "парсер всех ссылок на страницы с переходом на следующие"
судя по встречающимся терминам - ничего сложного, а в одно целое что-то никак не связывается (притормаживаю, видимо =)
Это задачка на знание регов. а для проверки знания регов можно что-нить и похитрее придумать.Автор оригинала: admin
Ну типа поиского робота паука ,)
Нашел ссылку - загрузи по ссылки - там пропарси
так бы сразу и сказал, а то ...типа поиского робота паука ,)
Хотя по совместительству он еще и рендер HTML.браузер - парсер HTML
На странных ты олимпиадах по програмированию участвовал.Автор оригинала: Romashov Kirill
А мне как-то раз в олимпиаде программеров довелось участвовать.
......
Самое весёлое - эти задания на пхп делаются в три счёта, а на остальных приходится потеть.
.....
Это олимпиада районного масштаба. Не особо сложные задания. У меня где-то были распечатки заданий, но сейчас не вспомню где. Вот например одно:RK>Самое весёлое - эти задания на пхп делаются в три счёта, а на остальных приходится потеть.
можно пример такого олимпиадного задания?
Да, я знаю. Уже Delphi под руководством брата учу. Он уже Delphi до малейшей детальки знает. Прог кучу написал.>Это олимпиада районного масштаба.
ну тогда понятно, извини.
Я сравнивал с олимпиадами республиканского (всеросийского) и международного уровня.
Но знаешь, такие задачи надо тоже уметь писать. А то привыкнеш к php, и потом будешь думать, где тебе на любом подручном компе взять сервер и php для того, чтобы показать свою программу. А так скомпилил и в путь.
Romashov Kirill
#!/usr/bin/perl -w
use strict;
my %DAta = ();
my $count = 0;
my $input_file = 'input.txt';
my $output_file = 'output.txt';
my $i=1;
open (FIN, "< $input_file") or die("Can not open file for read ($!)\n");
while (<FIN>){
chomp;
my ($name,@results) = split;
$data{$name} = [ @results ];
$count = scalar(@results) unless($count);
}
close FIN;
open (FOUT, "> $output_file") or die("Can not open file for write ($!)\n");
while ($i<=$count) {
print FOUT "Конкурс: $i\n";
foreach(sort { $data{$b}->[$i-1] <=> $data{$a}->[$i-1] } keys %DAta){
print FOUT "$_ - ",$data{$_}->[$i-1]," баллов\n";
}
print FOUT "\n";
$i++;
}
полностью согласен.понятно что данная программа будет проигрывать в скорости программе написанной на си например, НО сколько времени пойдет у человека на написание и отладку такой программы (весьма примитивной). Я как уже сказал выше, получил результат через 10 мин после прочтения вопроса, и если использовать это программу необходимо 1 раз (или раз в месяц) и не на гигабайтах данных, имхо подобный вариант и будет самым быстрым (учитывая время разработки)
si, не помнишь какой мы тест гоняли с чтением и обработкой тескта (я, ты и АнтоХа)? Проги были написаны на C, PHP, Java, тест был на скорость выполнения задачи.Я не думаю, что на php можно реализовать быстрый алгоритм какой-нить средней олимпиадной задачи, так как IMHO в скорости интерпретатор php проиграет любому другому языку програмированию
так и было, поэтому скрипт я на перле и написал, он очень быстр для подобных задач.Я только помню, что на первом был C (или АнтоХа использовал C++?), на втором - Java, на третьем - PHP, с существенным отставанием.