perl -wle "use 5.10.0;   say int foreach (1..100) ;"