$a = 1;
++$a for 1..999;