use Test::Most tests => 3, 'die';

use FindBin qw( $Bin );

use_ok 'Bio::DB::HTS::VCF';

ok my $v = Bio::HTS::VCF->new( filename => $Bin . "/data/test.vcf.gz" );
is $v->num_variants, 9, 'correct number of variants identified in file';


use Test::Most tests => 3, 'die';

use FindBin qw( $Bin );

use_ok 'Bio::DB::HTS::VCF';

ok my $v = Bio::DB::HTS::VCF->new( filename => $Bin . "/data/test.vcf.gz" );
is $v->num_variants, 9, 'correct number of variants identified in file';


Correct package name in vcf test
Correct package name in vcf test
