For loops in perl have two styles. The first is the c-style loop, the other is a...

pyre · on March 18, 2015

That, and Perl has an actual `map` function too:

  map { $_ + 1 } (@list);

huehue · on March 18, 2015

Sometimes Perl can be a beauty:

  sub sum_of_squared_pairs {
    reduce { $a + $b } map { $_ * $_ } grep { $_ % 2 == 0 } @_
  }

  sub schwartzian_transform {
    map  { $_->[0] }
    sort { $a->[1] <=> $b->[1] } # use numeric comparison
    map  { [$_, length $_] }     # calculate the length of the string
         @_
  }

eru · on March 19, 2015

Yes, but _ has dynamic scope (I believe). That's very dangerous in general.