use Test::More tests => 4;
BEGIN { use_ok('Tie::File::AsHash') };
# make sure the test file exists
ok(-e "t/testfile", "testfile that is used by the various tests");
my %hash;
ok((tie %hash, "Tie::File::AsHash", "t/testfile", split => ":", recsep => "\n"), "tie");
ok($hash{foo} eq "bar", "fetch");