--- trunk/views/00.demo.pl 2009/09/24 20:11:27 52 +++ trunk/views/00.demo.pl 2009/10/03 21:43:34 93 @@ -9,7 +9,7 @@ # FIXME out of memory without Sack::Digest #$out->{'C1 +'}->{ $_ }++ foreach @{ $rec->{C1} }; -$out->{'C1#+'}->{ digest($_) }++ foreach @{ $rec->{C1} }; +#$out->{'C1#+'}->{ digest($_) }++ foreach @{ $rec->{C1} }; $out->{'C1_country+'}->{ m{,\s+(\S+)\.$} && ucfirst(lc($1)) }++ foreach @{ $rec->{C1} };