$z = scalarmap { $a * $b } 1, 2..10;
  # is the same as
  use List::Util;
  $z = reduce { $a * $b } 1, 2..10;