equal
deleted
inserted
replaced
|
1 sed -n -e '/^%%Page.*/p' -e '/.*DW_.*/p' <dwarf.v2.ps | |
|
2 sed -n -e '/^%%Page.*/p' -e 's/.*\(DW_[a-z_A-Z]*\).*/\1/p' | |
|
3 nawk ' /^%%Page/{ p = $2 } \ |
|
4 /DW_/ { printf "%-30s %04d \n",$1,p \ |
|
5 }' | sort -u | |
|
6 nawk ' BEGIN {h = "xx"} \ |
|
7 { \ |
|
8 done = 0 ; \ |
|
9 if ( $1 != h ) { \ |
|
10 if(h != "xx") { \ |
|
11 printf "%-30s %s\n",h, pgs ; \ |
|
12 h = $1 ; \ |
|
13 tv = $2 + 0 ; \ |
|
14 done = 1 ; \ |
|
15 pgs = "" tv \ |
|
16 } \ |
|
17 } \ |
|
18 h = $1 ; \ |
|
19 if(done == 0 ) { \ |
|
20 tv = $2 + 0 ; \ |
|
21 pgs = pgs ", " tv \ |
|
22 } \ |
|
23 } \ |
|
24 END { printf "%-30s %s\n",h,pgs } ' |