#!/usr/bin/perl -w

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