my @x = map {$_*2} 1..3;
# --becomes-->
use English;
my @y = map { $ARG * 2 } 1..3;