diff options
Diffstat (limited to 'benchmark/other-lang/fib.pl')
-rw-r--r-- | benchmark/other-lang/fib.pl | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/benchmark/other-lang/fib.pl b/benchmark/other-lang/fib.pl index d660a2337b..a46f666d1e 100644 --- a/benchmark/other-lang/fib.pl +++ b/benchmark/other-lang/fib.pl @@ -1,11 +1,11 @@ -sub fib{
- my $n = $_[0];
- if($n < 3){
- return 1;
- }
- else{
- return fib($n-1) + fib($n-2);
- }
-};
-
-&fib(34);
+sub fib{ + my $n = $_[0]; + if($n < 3){ + return 1; + } + else{ + return fib($n-1) + fib($n-2); + } +}; + +&fib(34); |