open( ... )
for( 1 .. $choice )
{
  print LOG "x";
}
close( ... )