#! /usr/bin/gawk -f # usage: "$0 [ -v strip_page=1 ] [ -v strip_trans_code=1 ] < INFILE > OUTFILE # # Takes a single-version text in EVT format and prints it in a # more readable format, with " " instead of "." and page numebrs aligned. /^#/ { printf "%s\n", $0; next; } /^]/, "", n); gsub(/[;.]/, " ", n); split(n, nits); nn = nits[3]; if ( nn ~ /[0-9]$/ ) { nn = (nn " "); } if ( ! strip_page ) { printf "%6s.%-2s ", nits[1], nits[2]; } printf "%3s ", nn; if ( ! strip_trans_code ) { printf "%1s ", nits[4]; } gsub(/[.]/, " ", r); gsub(/-/, " - ", r); gsub(/=/, " = ", r) gsub(/[ ][ ]*$/, "", r); printf "%s\n", r; next; } /./ { printf "%s\n", $0; next; }