Return to Revisions

Like this, with one awk:

awk '$NF == "*"{$NF=""; arr[$0]++}END{for (i in arr) print i arr[i]}' *

With perl one-liner:

perl -anE '
    if ($F[-1] eq "*") {
        $k = join " ", @F[0..@F-2];
        $a->{$k}++
    }
    END{say "$_ $a->{$_}" for keys %$a}
' *

The -a is the split mode in @F default array, like the -F of awk