for(1..10) { print; $cnt++; }