Parent Directory | Revision Log | Patch
revision 25 by dpavlin, Sun Nov 4 22:44:42 2007 UTC | revision 26 by dpavlin, Mon Nov 19 16:37:00 2007 UTC | |
---|---|---|
# | Line 5 use blib; | Line 5 use blib; |
5 | ||
6 | use Test::More tests => 63; | use Test::More tests => 63; |
7 | use Test::Exception; | use Test::Exception; |
8 | use Data::Dump qw/dump/; | |
9 | ||
10 | BEGIN { | BEGIN { |
11 | use_ok( 'MARC::Fast' ); | use_ok( 'MARC::Fast' ); |
# | Line 14 my $debug = shift @ARGV; | Line 15 my $debug = shift @ARGV; |
15 | ||
16 | my $marc_file = 't/camel.usmarc'; | my $marc_file = 't/camel.usmarc'; |
17 | ||
if ( $debug ) { | ||
eval { require Data::Dump; }; | ||
$debug = 0 if ($@); | ||
} | ||
18 | my $marc; | my $marc; |
19 | my %param; | my %param; |
20 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |