summaryrefslogtreecommitdiffstats
path: root/MDK/Common/Func.pm
diff options
context:
space:
mode:
Diffstat (limited to 'MDK/Common/Func.pm')
-rw-r--r--MDK/Common/Func.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/MDK/Common/Func.pm b/MDK/Common/Func.pm
index 8cca560..6578010 100644
--- a/MDK/Common/Func.pm
+++ b/MDK/Common/Func.pm
@@ -1,3 +1,5 @@
+package MDK::Common::Func;
+
=head1 NAME
MDK::Common::Func - miscellaneous functions
@@ -142,8 +144,6 @@ L<MDK::Common>
=cut
-package MDK::Common::Func;
-
use MDK::Common::Math;
@@ -180,7 +180,7 @@ sub fold_left(&@) {
sub smapn {
my $f = shift;
my $n = shift;
- my @r = ();
+ my @r;
for (my $i = 0; $i < $n; $i++) { push @r, &$f(map { $_->[$i] } @_) }
@r
}