Anonymous avatar Anonymous committed ab39c82

Added the examples directory.

Comments (0)

Files changed (3)

 Build.PL
 Changes
 COPYING
+examples/perl-line-traces.txt
+examples/test.pl
 inc/Test/Run/Builder.pm
 INSTALL
 lib/Devel/LineTrace.pm

module/examples/perl-line-traces.txt

+test.pl:12
+    print "\$n=$n\n\$next=$next\n\$this=$this\n"

module/examples/test.pl

+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+sub fib
+{
+    my $n = shift;
+    my ($this, $next) = (0,1);
+    for my $i (0 .. ($n-1))
+    {
+        ($next, $this) = ($this+$next, $next);
+    }
+    return $this;
+}
+
+my $n = shift(@ARGV);
+print "FIB[$n] = " . fib($n) . "\n";
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.