my @squares = map { $_ * $_ } 1..3;  # BLOCK form of map