for ($i=$analysisstartposn-1 ; $i<($seqlength-$windowsize) ; $i+$stepsize)
{
   for ($j = $i ; $j < $i+$windowsize ; $j++)
   {
        print OUTFILE "$i\t$j\n";
   }
}