#@log_buffer has 100 elements;
$counter = $#log_buffer
$buffer = 1;
$counter_tens = $counter / 10;
$counter_tens = sprintf ("%d",$counter_tens); #to get whole number
for (1 .. $counter) {
	if ($buffer == $counter_tens) {
	print ("00");
	$buffer = 0;
	}
	$buffer++
}

##</code><code>##

print ("00");
sleep 1;
print ("00");
sleep 1;
print ("00");
sleep 1;
print ("00");
sleep 1;
print ("00");
sleep 1;
print ("00");
sleep 1;
print ("00");
sleep 1;
print ("00");
sleep 1;
print ("00");
sleep 1;
print ("00");