use Statistics::Burst; my $burstObj=Burst::new(); $burstObj->generateStates(3,.111,2); $burstObj->gamma(.5); $burstObj->setData(\@gap_space); $burstObj->process(); $statesUsed=$burstObj->getStatesUsed();