Basic Fibonacci in Perl 6

sub fib-basic($n) { if $n > 1 { return fib-basic($n - 1) + fib-basic($n - 2); } return $n; }