Help for this page
mysubroutine {block} @list;
map (sub { "1" x $_ }, (1..10));
perl -wle 'print prototype("CORE::map")'
Use of uninitialized value in print at -e line 1.