... is it possible to write a perl subroutine that does the same thing, myPerlSub BLOCK LIST

Absolutely. See perlsub and in particular Prototypes.

>perl -wMstrict -le
"sub mysub (&@) {
     my $coderef = shift;
     map $coderef->($_), @_;
     }
 my @out = mysub { $_ += 33 } 0 .. 5;
 print qq{@out};
"
33 34 35 36 37 38
[download]