Как распечатать данные в табличном формате в сценарии оболочки?

Question

Я работаю над скриптом, который должен отображать данные в табличном формате. Например: из приведенных ниже данных (я просто представляю в табличном формате для лучшего понимания). Мне нужно сформировать таблицу, используя код ниже столбца. если значение кода 0,0,1 для конкретного уникального идентификатора, то это случай неудачи (например:.

17348514-1426250247230 has executed 3 times 0,0,1) 
              F,F,S will be considered as a failure case. 


Year Mon D Time Stamp  Unique ID    TT  Code 
2015 Mar 13 09:48:16:099 -813380420-1426240092971 3.037  1 
2015 Mar 13 09:54:47:525 -477148470-1426240484040 3.402  1 
2015 Mar 13 11:26:42:728 1290473798-1426245992973 3.455  1 
2015 Mar 13 12:37:27:338 17348514-1426250247230 0.008  0 
2015 Mar 13 12:37:27:346 17348514-1426250247230 0.016  0 
2015 Mar 13 12:37:27:354 17348514-1426250247230 0.024  1 
2015 Mar 13 12:45:56:452 1124502614-1426250756375 0.009  0 
2015 Mar 13 12:45:56:460 1124502614-1426250756375 0.017  0 
2015 Mar 13 12:45:56:467 1124502614-1426250756375 0.024  1 
2015 Mar 13 12:54:29:835 289692663-1426251267376 2.384  1 
2015 Mar 13 13:24:53:226 2011983525-1426253085135 2.574  1 
2015 Mar 13 14:28:13:076 -74229411-1426256890662 2.339  1 

В результате таблица должна печатать как ниже формат я не хочу, чтобы напечатать общий успех, суммарные ошибки. ниже один имеет успех one.Hence подсчета успеха равен 1, и отсчет ошибок 0.

Date  Hour Time UniqueID    Success Error  timetaken 
2015Mar13 14 14:28 -74229411-1426256890662 1   0   2.339 

From the first table, 
2015 Mar 13 12:37:27:338 17348514-1426250247230 0.008  0 
2015 Mar 13 12:37:27:346 17348514-1426250247230 0.016  0 
2015 Mar 13 12:37:27:354 17348514-1426250247230 0.024  1 

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

Date  Hour Time UniqueID    Success Error  timetaken 
2015Mar13 14 14:28 -74229411-1426256890662 1   0   2.339  
2015Mar13 12 12:37 17348514-1426250247230 0   1   0.024  

Любая помощь будет оценена

Answer 1

TxR Язык:

Year Mon @(skip) 
@(collect) 
@year @month @day @hh:@mm:@ss:@msec @id @val @code 
@ (collect :gap 0 :vars (aval)) 
@(skip) @id @aval @nil 
@ (end) 
@ (set code @(int-str code)) 
@ (bind total @(or [aval -1] val)) 
@(end) 
@(output) 
Date  Hour Time UniqueID     Success Error  timetaken 
@ (repeat) 
@year@month@{day 2} @hh @hh:@mm @{id 24} @{code 9} @{@(- 1 code) 10} @total 
@ (end) 
@(end) 

Пробег:

$ txr reformat.txr data 
Date  Hour Time UniqueID     Success Error  timetaken 
2015Mar13 09 09:48 -813380420-1426240092971 1   0   3.037 
2015Mar13 09 09:54 -477148470-1426240484040 1   0   3.402 
2015Mar13 11 11:26 1290473798-1426245992973 1   0   3.455 
2015Mar13 12 12:37 17348514-1426250247230 0   1   0.024 
2015Mar13 12 12:45 1124502614-1426250756375 0   1   0.024 
2015Mar13 12 12:54 289692663-1426251267376 1   0   2.384 
2015Mar13 13 13:24 2011983525-1426253085135 1   0   2.574 
2015Mar13 14 14:28 -74229411-1426256890662 1   0   2.339