use strict; use warnings; for (1..5) { print 2 * $_, " "; } print "\n"; __END__ 2 4 6 8 10