Курс Raku / Об’єкти, введення-виведення та винятки / Введення та виведення / Файлові дескриптори / Вправи / Пронумеруйте рядки

Розв’язання: Пронумеруйте рядки

Ось один із можливих варіантів розв’язання задачі.

Код

spurt 'words.txt', "apple\nbanana\ncherry\n";

my $n = 0;
for 'words.txt'.IO.lines -> $line {
    $n++;
    say "$n: $line";
}

🦋 Вихідний код можна знайти у файлі shout-the-lines.raku.

Вивід

1: apple
2: banana
3: cherry

Коментарі

1. spurt записує три слова у файл, розділені переходами рядка.

2. .IO.lines видає рядки по черзі, без їхніх завершальних переходів рядка. Ми тримаємо лічильник $n, який збільшуємо на кожному проході, тож кожен рядок виводиться разом зі своєю позицією у файлі.

Навігація курсом

← Пронумеруйте рядки   |   Підрахунок рядків →