$x=$_*2,print("$x\n") for 1..10;