#!/usr/bin/perl -w

$nbin = 8;
$ranbase = 500;
$nsamp = 100000;
for ($i=0;$i<$nbin;$i++) {
    $nran = $i + $ranbase;
    $fname = "$nbin"."_analyt_"."$i.dat";
    print "Generating samples from $i\n";
    `python generatedata.py $i $nsamp $nran > $fname`;  
}