github.com/coyove/nj@v0.0.0-20221110084952-c7f8db1065c3/tests/bench/fib.pl (about)

     1  sub fib {
     2      my $n = shift;
     3  
     4      if ($n < 2) {
     5          return $n 
     6      }
     7      return (fib($n-1)+fib($n-2));
     8  }
     9  
    10  print fib(35);