/[Sack]/trunk/views/00.demo.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/views/00.demo.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 94 by dpavlin, Sun Oct 4 12:17:31 2009 UTC revision 115 by dpavlin, Tue Oct 6 00:03:21 2009 UTC
# Line 3  Line 3 
3    
4  #$out->{ 'years +' }->{ $rec->{PY}->[0] }++;  #$out->{ 'years +' }->{ $rec->{PY}->[0] }++;
5    
6  #$out->{ 'DT +' }->{ $_ }++ foreach @{ $rec->{DT} };  $out->{ 'DT +' }->{ $_ }++ foreach @{ $rec->{DT} };
7    
8  #$out->{'SC +'}->{ $_ }++ foreach @{ $rec->{SC} };  $out->{'SC +'}->{ $_ }++ foreach @{ $rec->{SC} };
9    
10  # FIXME out of memory without Sack::Digest  # FIXME out of memory without Sack::Digest
11  #$out->{'C1 +'}->{ $_ }++ foreach @{ $rec->{C1} };  #$out->{'C1 +'}->{ $_ }++ foreach @{ $rec->{C1} };
12  #$out->{'C1#+'}->{ digest($_) }++ foreach @{ $rec->{C1} };  #$out->{'C1#+'}->{ $_ }++ foreach @{ $rec->{C1} };
13    
14    
15  $out->{'C1_country+'}->{ m{,\s?([^,]+)\.$} && ucfirst(lc($1)) }++ foreach @{ $rec->{C1} };  #$out->{'C1_country+'}->{ m{,\s?([^,]+)\.$} && ucfirst(lc($1)) }++ foreach @{ $rec->{C1} };
16    
17    
18  #$out->{'CR#+'}->{ digest($_) }++ foreach @{ $rec->{CR} };  #$out->{'CR#+'}->{ $_ }++ foreach @{ $rec->{CR} };
19    
20  my $cr = 1;  my $cr = 1;
21  my $nr = $out->{_debug}->{nr}++;  my $nr = $out->{_debug}->{nr}++;
# Line 28  my $nr = $out->{_debug}->{nr}++; Line 28  my $nr = $out->{_debug}->{nr}++;
28    
29  #push @{ $out->{_debug}->{id} }, $rec->{'000'};  #push @{ $out->{_debug}->{id} }, $rec->{'000'};
30    
31  $out->{'_debug'}->{records}++;  $out->{'_debug'}->{records}++ if $rec;
32  $out->{'_debug'}->{start_t} ||= time;  $out->{'_debug'}->{start_t} ||= time;
33  $out->{'_debug'}->{duration} = time - $out->{'_debug'}->{start_t};  $out->{'_debug'}->{duration} = time - $out->{'_debug'}->{start_t};
Legend:
Removed from v.94  
changed lines
  Added in v.115
  ViewVC Help
Powered by ViewVC 1.1.26