#!/usr/bin/perl

for ( $i=100; $i<2000; $i+=100 ) {
   system( "./a.out .3 $i" ) ;
}

