форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Архивированная нить - только для чтения!  Пред. тема | След. тема
Форумы WEB технологии (Public)
Изначальное сообщение		[Проследить за развитием треда]

"не могу построчно сравнить два файла!"
Сообщение от z3f on 08-Янв-04, 16:21  (MSK)
Всем привет! есть два текстовых файла - один с правильными ответами (цифрами), другой с ответами пользователя(так же цифрами). Нужно выяснить правильно ответил пользователь или нет. Для этого нужно сравнить эти два файла по строчно. Делаю - open (F, " temp/otvet_polz.txt"); while (<F>) {         @arr[$i]=$_;         $i++;}; close (F); open (VOPR, "${bilet}/otvet.txt"); while (<VOPR>) {         @arr1[$i]=$_;         $i++;}; close (VOPR); for ($i=0; $i<=$#arr; $i++){         if (@arr[$i]<@arr1[$i] or @arr[$i]>@arr1[$i])                                    {$oshibki++;} }; то что здесь представлено - это уж совсем по тупому! И все равно неправильно сравнивает!!!!!! Я уже просто не прдставляю как сравнить! И вместо > ставил eq и ставил != и все равно неправильно сравнивает! Что делать? Помогите! С уважением z3f.
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Индекс форумов | Темы | Пред. тема | След. тема

Сообщения по теме

1. "может я неправльно объснил???"
Сообщение от z3f on 08-Янв-04, 20:49  (MSK)
Может я неправильно объяснил? Попровляюсь=) есть два текстовых файла - один с правильными ответами (в каждой строчке по одному числу) а второй с теми ответами которые ответил пользователь (так же в каждой отдельной строчке). Нужно построчно сравнить эти два файла. осли не совпадают значения тогда $oshibki++ =) делаю open (F, " temp/$files"); while (<F>) {        chomp(@arr = <F>);               }; close (F); open (VOPR, "${bilet}/otvet.txt"); while (<VOPR>) {        chomp(@arr1 = <VOPR>);               }; close (VOPR); for ( 1..$#arr ) {    $oshibki++ if ( $arr[$_] eq $arr1[$_] ) ;} Не работает!!!! Выдает в любом случае - 0 ошибок!!!! Помогите! С уважением z3f.
	Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "не могу построчно сравнить два файла!"
Сообщение от ovax on 09-Янв-04, 03:37  (MSK)
Ну, во первых, в массиве у тебя не числа, а строки. Включая символ перевода строки. Книжку бы купил, а то мне, например, лень дальше объяснять. у меня живот болит.
	Рекомендовать в FAQ | Cообщить модератору | Наверх

3. "не могу построчно сравнить два файла!"
Сообщение от ovax on 09-Янв-04, 05:59  (MSK)
while (<F>) {        chomp(@arr = <F>);               }; Уважаемый, что за бред ???
	Рекомендовать в FAQ | Cообщить модератору | Наверх

	4. "не могу построчно сравнить два файла!"
	Сообщение от z3f on 09-Янв-04, 13:23  (MSK)
	>while (<F>) { >       chomp(@arr = <F>); >}; >Уважаемый, что за бред ??? Обычный бред=) Причем рабочий=) И я понимаю что у меня строки а не цифры - потому и пишу - eq... А книжка - Стивер Холзнер "PERL - специальный справочник"... Так что вот так=((( А проблема - так и висит - не сраниваются строки=( С уважением z3f.
		Рекомендовать в FAQ | Cообщить модератору | Наверх

	5. "не могу построчно сравнить два файла!"
	Сообщение от GliNT on 10-Янв-04, 14:55  (MSK)
	open(F1, "file1.txt") || die $!; open(F2, "file2.txt") || die $!; my $mistakes = 0; while (<F1>){
		Рекомендовать в FAQ | Cообщить модератору | Наверх

	6. "не могу построчно сравнить два файла!"
	Сообщение от GliNT on 10-Янв-04, 15:01  (MSK)
	наверное так: open(F1, "file1.txt") || die $!; open(F2, "file2.txt") || die $!; my $mistakes = 0; while (<F1>){ if ($_ ne <F2> ){ $mistakes++; } } close(F1); close(F2);
		Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.