#!/usr/bin/perl -w

print "cp sinon.c run.c\n";
for($i = 1; $i < 21; $i++)
{
   for($j = 0; $j < 2; $j++)
   {
      $k = $j * 2;
      print "gcc -O$k run.c -o run && ./run | tee run.c\n" if !($i % (2 + $j));
   }
   print "sleep 2\n";
}