/[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 28 by dpavlin, Tue Sep 22 22:28:40 2009 UTC revision 30 by dpavlin, Wed Sep 23 18:44:08 2009 UTC
# Line 8  Line 8 
8  #$out->{'SC +'}->{ $_ }++ foreach @{ $rec->{SC} };  #$out->{'SC +'}->{ $_ }++ foreach @{ $rec->{SC} };
9    
10  # FIXME out of memory without md5  # FIXME out of memory without md5
11  #$out->{'C1 +'}->{ md5($_) }++ foreach @{ $rec->{C1} };  #$out->{'C1 +'}->{ $_ }++ foreach @{ $rec->{C1} };
12  $out->{'CR +'}->{ md5($_) }++ foreach @{ $rec->{CR} };  #$out->{'C1 +'}->{ digest($_) }++ foreach @{ $rec->{C1} };
13    $out->{'CR +'}->{ digest($_) }++ foreach @{ $rec->{CR} };
14    
15    my $cr = 1;
16    my $nr = $out->{_debug}->{nr}++;
17    #$out->{'CR +'}->{ "$nr." . $cr++ }++ foreach @{ $rec->{CR} };
18    
19  # XXX dump first record  # XXX dump first record
20  #$out->{_debug_rec} ||= $rec;  #$out->{_debug_rec} ||= $rec;
Legend:
Removed from v.28  
changed lines
  Added in v.30
  ViewVC Help
Powered by ViewVC 1.1.26