| xargs -0 -r sed -E '
s;^.*\t.*\t.*\ttags=(.*)\tcomment=.*\t.*\r$;\1;;
s;,;\n;g;' \
- | UNSTRING \
| { sort; printf '\n'; } \
| while read -r tag; do
- [ "$tag" = "$otag" ] \
- && cn=$((cn + 1)) \
- || {
- printf "%i %s\n" "$cn" "$otag"
+ if [ "$tag" = "$otag" ]; then
+ cn=$((cn + 1))
+ else
+ printf "%i %s\n" "$cn" "$(UNSTRING "$otag")"
cn=1
- }
+ fi
otag="$tag"
done \
|sort -rn |cut -f2- |HTML \