#!./perl
#
# Copyright (c) 1995-2000, Raphael Manfredi
#
# You may redistribute only under the same terms as Perl 5, as specified
# in the README file that comes with the distribution.
#
# Original Author: Ulrich Pfeifer
# (C) Copyright 1997, Universitat Dortmund, all rights reserved.
#
chdir('t') if -d 't';
} else {
}
print "1..0 # Skip: Storable was not built\n";
exit 0;
}
}
# problems with 5.00404 when in an BEGIN block, so this is defined here
print "1..0 # Skip: File::Spec 0.8 needed\n";
exit 0;
# Mention $File::Spec::VERSION again, as 5.00503's harness seems to have
# warnings on.
}
print "1..8\n";
my $test = 1;
my $result;
$Storable::forgive_me=1;