Help for this page

Select Code to Download


  1. or download this
    pugs> sub foo { [~] map -> $a, $b { lc $a, uc $b }, @_ };
    pugs> say foo <FoO bAr BaZ>;
    fooBARbaz
    
  2. or download this
    pugs> sub prod (int $n, int $m) { [*] $n..$m };
    pugs> say prod 3, 6;
    360