Parent Directory | Revision Log | Patch
revision 46 by dpavlin, Fri Jul 7 10:25:02 2006 UTC | revision 47 by dpavlin, Fri Jul 7 10:33:33 2006 UTC | |
---|---|---|
# | Line 109 sub test_data { | Line 109 sub test_data { |
109 | ||
110 | foreach my $mfn (1 .. $isis->count) { | foreach my $mfn (1 .. $isis->count) { |
111 | ||
diag "row: ",Dumper( $data->[$mfn-1] ); | ||
112 | my $rec; | my $rec; |
113 | ok($rec = $isis->fetch($mfn), "fetch $mfn"); | ok($rec = $isis->fetch($mfn), "fetch $mfn"); |
114 | ||
115 | diag "rec: ",Dumper( $rec ); | |
116 | diag "<<<<< rec: ",Dumper( $rec ), "\n>>>>> row:", Dumper( $data->[$mfn-1] ); | |
117 | ||
118 | foreach my $f (keys %{$data->[$mfn-1]}) { | foreach my $f (keys %{$data->[$mfn-1]}) { |
119 | my $i = 0; | my $i = 0; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |