until ($s_counter == $permanent_counter)
{
 $Sheet->Cells(1,1)->{Value} = "somevalue";
  $s_counter=$s_counter+1;
}

##</code><code>##

        $Sheet->Cells($s_counter,1)->{Value} = "somevalue";

##</code><code>##

        $Sheet->Cells(1,1)->{Value} = "somevalue";