Examples for Chapter 3 written in Perl 5 (#71)

* Create 01_countdown.pl

Recursion example #1 written in Perl 5

* Create 02_greet.pl

Recirsion example #2 written in Perl 5

* Create 03_factorial.pl

Recursion example #3 written in Perl 5

03_recursion/perl5/01_countdown.pl

@@ -0,0 +1,15 @@
+sub countdown {
+
+    my $i = shift;
+
+    print "$i\n";
+
+    # base case:
+    return if $i <= 1;
+
+    # recursive case
+    countdown( $i - 1 );
+
+}
+
+countdown(5);