Как здесь заменить goto на while?

@авч · Регистрация: 15.10.2016

Студворк — интернет-сервис помощи студентам

код не запускается видимо из-за того, что goto запрещено выходить за скобки. но пытаясь заменить его на while я запутался. можете подсказать как это сделать?

PHP
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
<?php
$stats = '-1';
//отчистка
$fh = fopen('summ.txt', 'w'); 
fclose($fh);
//вытащить коды
$fh = fopen("kodi-list.txt", "r"); 
$sss = fgets($fh);
$kodi = explode(",", $sss);
fclose ($fh);
//переменые
$max = '40';
$adin = '1';
$tire = '-';
 
a:
//проверка на лимит
$stats = ($stats + $adin);
if($stats == $max)
{
exit;
}
else
{
//конкретный код
$kod = $kodi[$stats];
//поиск кода в файле
$arr = file('c000.txt');
foreach( $arr as $k=>$v )
{
    if (strpos($v, $kod,0) !==false )
    {
//ЕСЛИ НАШОЛ КОД
$nomer = $k;
$data = $v; 
    
    
b:  
//разделяем на до i после
$razd = explode("і", $data); 
$str = $razd[1];
// заменяет - на 0    
$data0 = str_replace($tire, "0", $str);
// проверяем наличие здесь цифры
preg_match("/[\d]+/", $data0, $match);
if($match[0] === NULL)
{
//если нет цифр перейти проверить следующую строку
$nomer = ($nomer + $adin); 
$data = $arr[$nomer];
 
goto b;
}
else
    {   
//если есть цифры
//убрать лишние пробелы
$str = preg_replace('/\s\s+/', ' ', $str);
//разделяем цифры по массиву
$num = explode(" ", $str); 
//сложение
$summ = $num[1]+$num[7]+$num[8]+$num[9];
//записать сумму
$fh=fopen ("summ.txt", "a+"); 
fwrite($fh,"$summ\n"); 
fclose ($fh); 
//перейти к след. коду
    
goto a; 
        }
    }
else
        {
//если код не найден 
//перейти к след. коду
    
goto a;
        }
    }
}
 
?>

@Jewbacabra · 23.11.2020, 15:26

Сообщение от авч

код не запускается видимо из-за того

Интерпретатор php способен выдать сообщение об ошибке, так что гадать не нужно.

PS. пытаться понять что делает чужой нерабочий неотформатированный код с goto не самое приятное занятие

@авч · 23.11.2020, 18:17 **[ТС]**

код то рабочий, если закомментировать все goto и его ссылки ( a: и b: ). они можно сказать стоят там для наглядности, чтобы указать места для повторений кода при условии (while или do-while). Не обязательно понимать работу всего кода, нужно лишь goto и их сылки обернуть в while или нечто подобное

@sad67man · 23.11.2020, 18:35

авч,

PHP
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
<?php
 
$fh = fopen("kodi-list.txt", "r");
$kodi = explode(",", fgets($fh));
fclose ($fh);
 
 
$arr = file('c000.txt');
 
$sumFn = fopen('summ.txt', 'w');
 
foreach ($kodi as $kod) {
    foreach ($arr as $nomer => $data) {
 
        if (strpos($data, $kod,0) === false) {
            continue;
        }
 
        $razd = explode("і", $data);
        $str = $razd[1];
        $data0 = str_replace('-', "0", $str);
 
        if (preg_match("/[\d]+/", $data0)) {
 
            $str = preg_replace('/\s\s+/', ' ', $str);
            $num = explode(" ", $str);
            $summ = $num[1] + $num[7] + $num[8] + $num[9];
 
            fwrite($sumFn, $summ . PHP_EOL);
        }
    }
}
 
fclose($fh);

Добавлено через 4 минуты
авч, Код можно и не понимать, но при попытке рефакторинга в некоторых местах получался абсурд, поэтому на ходу додумывал, что вы пытались сделать.

@авч · 23.11.2020, 19:28 **[ТС]**

У меня есть тхт файл (c000.txt), в котором нужно найти строки в которых есть определенные коды. Все коды перечислены через запятую в (kodi-list.txt). После того как строка найдена необходимо её обработать: выбросить лишнее, то есть то что до буквы (i), затем заменить все тире (-) если они там есть на ноль (0). После чего можно произвести проверку на наличие чисел в строке, и если их нет то спуститься на строку ниже и повторять обработку строки до тех пор, пока не найдется строка с числами. Когда она найдется нужно оставить по одному пробелу между цифрами для удачного выделения чисел в массив, с которым уже можно работать складывая нужные числа и записывая в файл.

Также нужно выполнить поиск всех кодов по очереди, записанных в файле (kodi-list.txt) их там 40шт. Для этого я создал переменную $stats, которая с каждым новым кодом прибавляла к себе 1, для того чтобы указать когда нужно скрипту остановиться. И одновременно являясь номером кода в массиве, например $kod = $kodi[$stats]; . А также нужно было учесть, что php считает с 0, а не с 1, так что нужно было выдать изначально значение для stats минус один.

Вот так вот, если коротко

@Jewbacabra · 23.11.2020, 19:39

Сообщение от авч

код не запускается

Сообщение от авч

код то рабочий

Код Шрёдингера?

@авч · 23.11.2020, 19:41 **[ТС]**

Забыл добавить еще, в случае если код не найден нужно было перейти к следующему коду и вставить заглушку вместо суммы (какой-нибудь символ).

PHP/HTML
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
<?php
$stats = '-1';
//отчистка
$fh = fopen('summ.txt', 'w');
fclose($fh);
//вытащить коды
$fh = fopen("kodi-list.txt", "r");
$sss = fgets($fh);
$kodi = explode(",", $sss);
fclose($fh);
//переменые
$max = '40';
$adin = '1';
$tire = '-';
a:
    //проверка на лимит
    $stats = ($stats + $adin);
    if ($stats == $max) {
        exit;
    } else {
        //конкретный код
        $kod = $kodi[$stats];
        //поиск кода в файле
        $arr = file('c000.txt');
        foreach ($arr as $k => $v) {
            if (strpos($v, $kod, 0) !== false) {
                //ЕСЛИ НАШОЛ КОД
                $nomer = $k;
                $data = $v;
                b:
                    //разделяем на до i после
                    $razd = explode("і", $data);
                    $str = $razd[1];
                    // заменяет - на 0
                    $data0 = str_replace($tire, "0", $str);
                    // проверяем наличие здесь цифры
                    preg_match("/[\d]+/", $data0, $match);
                    if ($match[0] === NULL) {
                        //если нет цифр перейти проверить следующую строку
                        $nomer = ($nomer + $adin);
                        $data = $arr[$nomer];
                        gotob;
                    } else {
                        //если есть цифры
                        //убрать лишние пробелы
                        $str = preg_replace('/\s\s+/', ' ', $str);
                        //разделяем цифры по массиву
                        $num = explode(" ", $str);
                        //сложение
                        $summ = $num[1] + $num[7] + $num[8] + $num[9];
                        //записать сумму
                        $fh = fopen("summ.txt", "a+");
                        fwrite($fh, "$summ\n");
                        fclose($fh);
                        //перейти к след. коду
                        gotoa;
                    }
                } else {
                    //если код не найден
                    //перейти к след. коду
                    gotoa;
                }
            }
        }
?>

@sad67man · 23.11.2020, 19:45

Сообщение от авч

Также нужно выполнить поиск всех кодов по очереди, записанных в файле (kodi-list.txt) их там 40шт.

В этих стройках вы уже получаете массив кодов

PHP
1
2
3
$fh = fopen("kodi-list.txt", "r");
$kodi = explode(",", fgets($fh));
fclose ($fh);

Поэтому достаточно сделать его обход через foreach. Переменная $stats не нужна.

Тут вы получаете массив строк из файла

PHP
1
$arr = file('c000.txt');

Получается можно просто сделать двойной цикл.

Сообщение от авч

затем заменить все тире (-) если они там есть на ноль (0). После чего можно произвести проверку на наличие чисел в строке

0 - это же число, получается, после замены - на ноль, в строке будет число (0). Если вы ищете кроме цифр еще и тире, то не нужно делать лишних действий - это сбивает с толку, можно просто искать на число и тире

PHP
1
2
3
4
5
6
$razd = explode("і", $data);
$str = $razd[1];
 
if (preg_match("/[\d-]+/", $str)) {
    //...
}

@авч · 23.11.2020, 20:16 **[ТС]**

Всё еще думаю, почему при выполнении вашего кода summ.txt пустой... даже после исправления line 34
А тире нужно заменять, потому что потом нужно складывать и записывать как числа. А в с000 просто нули так записаны

@sad67man · 23.11.2020, 20:27

Сообщение от авч

Всё еще думаю, почему при выполнении вашего кода summ.txt пустой...

Нужно дебажить. Возможно до записи в файл дело не доходит. Если скинете файлы, то смогу протестить.

Сообщение от авч

А тире нужно заменять, потому что потом нужно складывать и записывать как числа. А в с000 просто нули так записаны

Я только отрефакторил код, логику не менял. У вас переменная $data0 больше нигде не используется, кроме как в условии preg_match.

Тогда уже так

PHP
1
$str = str_replace('-', "0", $str);

@авч · 23.11.2020, 21:17 **[ТС]**

https://www.cyberforum.ru/atta... 1606155427

@sad67man · 23.11.2020, 21:51

авч, Проследите, чтоб у вас был включен вывод ошибок. Потому что у меня вылетело куча warning-ов. Из-за того, что файлы называются не так, как в коде.

@авч · 24.11.2020, 12:36 **[ТС]**

sad67man, Благодарю за подсказки, в общем после небольших изменений скрипт начал работать. Но в случае если кода не находит он просто переходит к следующему, не вставляя заглушку и в summ.txt выходит меньше строк. Но это наверное мелочи

PHP
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
<?php
 ini_set('error_reporting', E_ALL);
 ini_set('display_errors', 1);
 ini_set('display_startup_errors', 1);
$fh = fopen("kodi-list.txt", "r");
$kodi = explode(",", fgets($fh));
fclose ($fh);
 
$adin = '1';
$arr = file('c000.txt');
 
 
 
foreach ($kodi as $kod) {
    foreach ($arr as $nomer => $data) {
        
        if (strpos($data, $kod,0) === false) 
        {
            continue;
        }
        x:
        $razd = explode("i", $data);
        $str = $razd[1];
        $str = str_replace('-', "0", $str);
 
        if (preg_match("/[\d]+/", $str)) {
 
            $str = preg_replace('/\s\s+/', ' ', $str);
            $num = explode(" ", $str);
            $summ = $num[1] + $num[7] + $num[8] + $num[9];
            $sumFn = fopen('summ.txt', 'a+');
            fwrite($sumFn, "$summ \n");
            fclose($sumFn);
        }
        else
        {
            $nomer = ($nomer + $adin);
            $data = $arr[$nomer];           
            goto x;
                        
        }
    }
}
 
?>

@sad67man · 24.11.2020, 13:59

авч, goto использовать крайне не рекомендуется. Вы должны забыть про эту конструкцию - это пережитки прошлого. У вас был вопрос, как от них избавиться. Однако вы все равно ее впихнули)

Вы и так находитесь в цикле перебора массива строк файла. Зачем вы на else добавили получение следующего элемента? когда и так он будет в следующей итерации. Более того - таким образом вы пропускаете проверку на вхождение кода в строку.

Добавлено через 9 минут

Сообщение от авч

Но в случае если кода не находит он просто переходит к следующему, не вставляя заглушку и в summ.txt выходит меньше строк.

Значит нужно вынести запись в файл во внешний цикл.

PHP
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
foreach ($kodi as $kod) {
 
    $summ = 0;
 
    foreach ($arr as $data) {
 
        if (strpos($data, $kod,0) === false) {
            continue;
        }
 
        $razd = explode("i", $data);
        $str = $razd[1];
        $str = str_replace('-', "0", $str);
 
        if (preg_match("/[\d]+/", $str)) {
 
            $str = preg_replace('/\s\s+/', ' ', $str);
            $num = explode(" ", $str);
            $summ = $num[1] + $num[7] + $num[8] + $num[9];
        }
    }
 
    $sumFn = fopen('summ.txt', 'a+');
    fwrite($sumFn, $summ . PHP_EOL);
    fclose($sumFn);
}

@авч · 24.11.2020, 14:36 **[ТС]**

sad67man, Да, я специально пропускаю проверку на вхождение кода в строку, поскольку цифры не всегда в той же строке, что и код а бывают и ниже. Так что ему надо спускаться от найденного места до тех пор, пока не найдет там цифр.

@sad67man · 24.11.2020, 15:25

авч, Можно добавить флаг - найден ли код в предыдущих строках.

PHP
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
foreach ($kodi as $kod) {
 
    $summ = 0;
    $isFind = false;
 
    foreach ($arr as $data) {
 
        if (!$isFind && strpos($data, $kod) === false) {
            continue;
        }
 
        $isFind = true;
 
        $razd = explode("і", $data);
        $str = $razd[1] ?? '';
        $str = str_replace('-', "0", $str);
 
        if (preg_match("/[\d]+/", $str)) {
 
            $str = preg_replace('/\s\s+/', ' ', $str);
            $num = explode(" ", $str);
            $summ = $num[1] + $num[7] + $num[8] + $num[9];
 
            $isFind = false;
        }
    }
 
    $sumFn = fopen('summ.txt', 'a+');
    fwrite($sumFn, $summ . PHP_EOL);
    fclose($sumFn);
}

@iplaton · 24.11.2020, 16:29

Не по теме:

83 строки протухшего кода(извините, в прошлом веке это считалось программой на php), вызвало целое обсуждение аж на сутки. переписать код в соответствии с элементарными PSR заняло бы минут 30. но зачем..

@авч · 24.11.2020, 18:53 **[ТС]**

sad67man, странно, но после того как вынес запись в файл за скобки и добавил заглушку $summ стало ругаться на эту строку $str = $razd[1]; . Причем здесь это, если до этого все работало прекрасно - не понятно. (выдаёт Notice: Undefined offset: 1). А ещё если сохранить в файл значения $data[4] то он будет записывать то пустые строки, то тире (-). Неужели $data это массив из одной строки? Может это и причина ругани на $razd, explode же не может наверное нормально сработать если $data это по символьный массив строки?

Добавлено через 1 час 51 минуту
А нет, это я сглупил всё работает, дело было в кодировке поэтому $razd разделять не мог

Новые блоги и статьи Все статьи Все блоги /
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .

@авч 1 / 1 / 1 Регистрация: 15.10.2016 Сообщений: 23
	23.11.2020, 18:17 [ТС]
	код то рабочий, если закомментировать все goto и его ссылки ( a: и b: ). они можно сказать стоят там для наглядности, чтобы указать места для повторений кода при условии (while или do-while). Не обязательно понимать работу всего кода, нужно лишь goto и их сылки обернуть в while или нечто подобное 0

@авч 1 / 1 / 1 Регистрация: 15.10.2016 Сообщений: 23
	23.11.2020, 19:28 [ТС]
	У меня есть тхт файл (c000.txt), в котором нужно найти строки в которых есть определенные коды. Все коды перечислены через запятую в (kodi-list.txt). После того как строка найдена необходимо её обработать: выбросить лишнее, то есть то что до буквы (i), затем заменить все тире (-) если они там есть на ноль (0). После чего можно произвести проверку на наличие чисел в строке, и если их нет то спуститься на строку ниже и повторять обработку строки до тех пор, пока не найдется строка с числами. Когда она найдется нужно оставить по одному пробелу между цифрами для удачного выделения чисел в массив, с которым уже можно работать складывая нужные числа и записывая в файл. Также нужно выполнить поиск всех кодов по очереди, записанных в файле (kodi-list.txt) их там 40шт. Для этого я создал переменную $stats, которая с каждым новым кодом прибавляла к себе 1, для того чтобы указать когда нужно скрипту остановиться. И одновременно являясь номером кода в массиве, например $kod = $kodi[$stats]; . А также нужно было учесть, что php считает с 0, а не с 1, так что нужно было выдать изначально значение для stats минус один. Вот так вот, если коротко 0

@авч 1 / 1 / 1 Регистрация: 15.10.2016 Сообщений: 23
	23.11.2020, 20:16 [ТС]
	Всё еще думаю, почему при выполнении вашего кода summ.txt пустой... даже после исправления line 34 А тире нужно заменять, потому что потом нужно складывать и записывать как числа. А в с000 просто нули так записаны 0

@sad67man 2604 / 1508 / 689 Регистрация: 23.08.2015 Сообщений: 3,839
	23.11.2020, 21:51
	авч, Проследите, чтоб у вас был включен вывод ошибок. Потому что у меня вылетело куча warning-ов. Из-за того, что файлы называются не так, как в коде. 1

@авч 1 / 1 / 1 Регистрация: 15.10.2016 Сообщений: 23
	24.11.2020, 14:36 [ТС]
	sad67man, Да, я специально пропускаю проверку на вхождение кода в строку, поскольку цифры не всегда в той же строке, что и код а бывают и ниже. Так что ему надо спускаться от найденного места до тех пор, пока не найдет там цифр. 0

@iplaton
	24.11.2020, 16:29
	Не по теме: 83 строки протухшего кода(извините, в прошлом веке это считалось программой на php), вызвало целое обсуждение аж на сутки. переписать код в соответствии с элементарными PSR заняло бы минут 30. но зачем.. 0

@авч 1 / 1 / 1 Регистрация: 15.10.2016 Сообщений: 23
	24.11.2020, 18:53 [ТС]
	sad67man, странно, но после того как вынес запись в файл за скобки и добавил заглушку $summ стало ругаться на эту строку $str = $razd[1]; . Причем здесь это, если до этого все работало прекрасно - не понятно. (выдаёт Notice: Undefined offset: 1). А ещё если сохранить в файл значения $data[4] то он будет записывать то пустые строки, то тире (-). Неужели $data это массив из одной строки? Может это и причина ругани на $razd, explode же не может наверное нормально сработать если $data это по символьный массив строки? Добавлено через 1 час 51 минуту А нет, это я сглупил всё работает, дело было в кодировке поэтому $razd разделять не мог 0

Как здесь заменить goto на while?

Решение