Select Code to Download

push @ret, $coderef->() for @params;

#!/usr/bin/env perl
use 5.010;
...

my @a = ( "1", "2", "3", "4", );
my @b = foo( sub { $_ ** 2 }, @a);