summaryrefslogtreecommitdiff
path: root/perl/p2.pl
diff options
context:
space:
mode:
Diffstat (limited to 'perl/p2.pl')
-rwxr-xr-xperl/p2.pl6
1 files changed, 2 insertions, 4 deletions
diff --git a/perl/p2.pl b/perl/p2.pl
index ec85ec1..6a226e1 100755
--- a/perl/p2.pl
+++ b/perl/p2.pl
@@ -13,8 +13,7 @@ sub iter1 {
iter1([$b, $a+$b], $a & 1 ? $acc : $acc + $a);
}
}
-print iter1([1, 2], 0);
-print "\n";
+print iter1([1, 2], 0), "\n";
# Functional (tail recursive)
sub iter2 {
@@ -27,8 +26,7 @@ sub iter2 {
goto &iter2;
}
}
-print iter2([1, 2], 0);
-print "\n";
+print iter2([1, 2], 0), "\n";
# Imperative
my ($a, $b) = (1, 2);