Parent Directory
| 
Revision Log
| 
Patch
| revision 886 by dpavlin, Fri Sep 29 19:52:21 2006 UTC | revision 887 by dpavlin, Mon Sep 3 15:26:46 2007 UTC | |
|---|---|---|
| # | Line 6 use Cwd qw/abs_path/; | Line 6 use Cwd qw/abs_path/; |
| 6 | use blib; | use blib; |
| 7 | use strict; | use strict; |
| 8 | ||
| 9 | use Data::Dumper; | use Data::Dump qw/dump/; |
| 10 | ||
| 11 | my $debug = 1; | my $debug = 1; |
| 12 | ||
| # | Line 42 foreach my $mfn ( 1 ... $size ) { | Line 42 foreach my $mfn ( 1 ... $size ) { |
| 42 | ||
| 43 | cmp_ok($input->pos, '==', $mfn, "pos $mfn"); | cmp_ok($input->pos, '==', $mfn, "pos $mfn"); |
| 44 | ||
| 45 | diag "rec: ", Dumper($rec), "\n"; | diag "rec: ", dump($rec), "\n"; |
| 46 | } | } |
| 47 |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |