From: Shawn Boyette Date: Tue, 5 May 2009 16:43:45 +0000 (+0000) Subject: sample stuffs working pretty good now X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=commitdiff_plain;h=5920a6497c3eeb26fd66cdeae6cb3386686a561a sample stuffs working pretty good now --- diff --git a/extract_holdings b/extract_holdings index 32fd2e4..29bd56d 100755 --- a/extract_holdings +++ b/extract_holdings @@ -43,8 +43,8 @@ sub dump_sample_detail { for my $subkey (sort keys %{$tags->{$tag}}) { my $sub = $tags->{$tag}{$subkey}; print " Subfield: $subkey\n"; - print " Sample: '", $sub->{value}, "'\n\n"; - print " Count: ", $sub->{count}, " in ", $sub->{rcnt}, " tags\n"; + print " Sample: '", $sub->{value}, "'\n"; + print " Count: ", $sub->{count}, " in ", $sub->{tcnt}, " tags\n\n"; #print "(", int($sub->{count} / $sub->{rcnt}), "%)\n"; } }