xref: /dports/math/p5-Statistics-Frequency/Statistics-Frequency-0.04/t/01_new.t

print "1..1\n";

use Statistics::Frequency;

my $f = Statistics::Frequency->new();

print $f->isa('Statistics::Frequency') ? "ok 1\n" : "not ok 1\n";