From 1a4e6e9708b4cdc426ebd1226a7f10f8e4259b75 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 23 Feb 2000 05:23:12 +0000
Subject: 2000-02-23

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@624 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 sample/fib.pl | 19 ++++++++++---------
 1 file changed, 10 insertions(+), 9 deletions(-)

(limited to 'sample')

diff --git a/sample/fib.pl b/sample/fib.pl
index c5593764a..945a4929a 100644
--- a/sample/fib.pl
+++ b/sample/fib.pl
@@ -1,10 +1,11 @@
-   sub fib {
-       local($n)=@_;
-       if( $n<2 ){
-           return $n;
-       } {
-           return &fib($n-2)+&fib($n-1)
-       }
-   }
+sub fib {
+    my($n)=@_;
+    if ($n<2) {
+	return $n;
+    }
+    else {
+	return fib($n-2)+fib($n-1);
+    }
+}
 
-   print &fib(20), "\n";
+print fib(20), "\n";
-- 
cgit