Help for this page

Select Code to Download


  1. or download this
    sub fibonacci {
       my ($n) = @_;
    ...
       return 1 if $n == 1;
       return sum fibonacci($n-2), fibonacci($n-1);
    }
    
  2. or download this
    sub fibonacci {
       my ($n) = @_;
    ...
          async { fibonacci($n-2) },
          async { fibonacci($n-1) };
    }
    
  3. or download this
    sub fibonacci {
       my ($n) = @_;
    ...
          async_maybe { fibonacci($n-2) },
          async_maybe { fibonacci($n-1) };
    }
    
  4. or download this
    sub fibonacci {
       my ($n) = @_;
    ...
       #      must call $on_complete->($x+$y).
    
    }