Вопрос к консольным ниндзя: можно ли считать аггрегации с помощью

Question

Modern::Perl

Вопрос к консольным ниндзя: можно ли считать аггрегации с помощью

perl -ne ?

Например, читаем файл построчно, выделяем там кусочек со значением цены, и считаем сумму по файлу или там сумму с группировкой по другому аттрибуту

#perl #programming #russian

0

28.08.2024

8 ответов

11 просмотров

ildar efremov

sub END или посмотри -p

0

3 месяца назад

Askar Timirgazin Автор вопроса

Dark Labbit
какие-то морально-этические проблемы с реализацией...

Да, ну нет. Я прост нашел на стекоаерфлоу решение на jq, там какое-то скриптование, а мне лень учить ещё один скриптовый язык

0

3 месяца назад

Ярослав🧞 Косьмина

Имеется ввиду найти строку и потом посчитать что-то до конечной строки? Для этого в perl есть flip-flop оператор: Цена: 1 Цена: 2 --- Цена: 3 Цена: 4 *** Цена: 5 $ perl -e 'while(<>) { do { $sum+=$1 if /Цена: (\d+)/ } if /---/ .. /\*{3}/ } print $sum, "\n"' file.log 7

0

3 месяца назад

Vyacheslav Koval

Используй конструкцию }{ и сохранение в хэш.

0

3 месяца назад

Sergei Zhmylove

Всё можно брат

0

3 месяца назад

Askar Timirgazin Автор вопроса

ildar efremov
sub END или посмотри -p