>perl -wMstrict -le
"sub printIndex {
   my ($hr) = @_;
   for my $book (sort by_book_number keys %$hr) {
     for my $citation (sort by_first_word keys %{$hr->{$book}}) {
       print qq{'$book' '$citation' pgs },
         join ', ', @{ $hr->{$book}{$citation} };
       }
     }
   }
 ;;
 sub by_book_number {
   my ($an) = $a =~ m{ (\d+) }xms;
   my ($bn) = $b =~ m{ (\d+) }xms;
   return $an <=> $bn;
   }
 ;;
 sub by_first_word {
   my ($aw) = $a =~ m{ ([[:alpha:]]+) }xms;
   my ($bw) = $b =~ m{ ([[:alpha:]]+) }xms;
   return uc($aw) cmp uc($bw);
   }
 ;;
 my %ibIndex = (
   'Book 10' => {
     'wormhole' => [ 150 ],
     'World  Wide Web (WWW)' => [ 75, 137, 153 ],
     'Wigner, Eugene P. (1902-1995)' => [ 200, 200, 203, 208 ],
     'World War II (WWII)' => [ 127 ],
     'Work and play' => [ 235 ],
     },
   'Book 1' => {
     'wormhole' => [ 266 ],
     'Whistlefield Estate' => [ 64, 73, 74, 96 ],
     'wisdom' => [ 134, 140, 161, 210, 240, 58 ],
     'Yost, Bill' => [ 75, 88 ],
     '\"winners,\" evolutionary (see \"evolution,\" \"natural selection\")'
        => [ 198, 199, 226, 2 ],
     'Wigner, Eugene P. (1902-1995)' => [ 32 ],
     },
   'Book 2' => {
     'worldview' => [ 343 ],
     'wisdom' => [ 71, 130, 153, 220, 262, 265, 286, 313, 331 ],
     'will' => [ 82, 117, 164 ],
     'World community' => [ 344 ],
     },
   );
 ;;
 printIndex(\%ibIndex);
"
'Book 1' 'Whistlefield Estate' pgs 64, 73, 74, 96
'Book 1' 'Wigner, Eugene P. (1902-1995)' pgs 32
'Book 1' '"winners," evolutionary (see "evolution," "natural selection")' pgs 198, 199, 226, 2
'Book 1' 'wisdom' pgs 134, 140, 161, 210, 240, 58
'Book 1' 'wormhole' pgs 266
'Book 1' 'Yost, Bill' pgs 75, 88
'Book 2' 'will' pgs 82, 117, 164
'Book 2' 'wisdom' pgs 71, 130, 153, 220, 262, 265, 286, 313, 331
'Book 2' 'World community' pgs 344
'Book 2' 'worldview' pgs 343
'Book 10' 'Wigner, Eugene P. (1902-1995)' pgs 200, 200, 203, 208
'Book 10' 'Work and play' pgs 235
'Book 10' 'World  Wide Web (WWW)' pgs 75, 137, 153
'Book 10' 'World War II (WWII)' pgs 127
'Book 10' 'wormhole' pgs 150