Parent Directory | Revision Log | Patch
revision 13 by dpavlin, Wed Dec 29 20:10:59 2004 UTC | revision 15 by dpavlin, Wed Dec 29 22:46:40 2004 UTC | |
---|---|---|
# | Line 24 for (my $mfn = 1; $mfn <= $maxmfn; $mfn+ | Line 24 for (my $mfn = 1; $mfn <= $maxmfn; $mfn+ |
24 | push @{$rec->{$f}}, OpenIsis::subfields($v); | push @{$rec->{$f}}, OpenIsis::subfields($v); |
25 | } | } |
26 | } | } |
27 | print STDERR Dumper($rec); | print STDERR Dumper($rec),"\n"; |
28 | } | } |
29 | foreach my $k (sort keys %{$row}) { | foreach my $k (sort keys %{$row}) { |
30 | next if ($k eq 'mfn'); | next if ($k eq 'mfn'); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |