initial

tonytamsf · May 12, 2013 · a0932b6 · a0932b6
1 parent 81d5dd8
commit a0932b6
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/percent-diff b/percent-diff
@@ -0,0 +1,9 @@
+#!/usr/bin/perl -w
+
+use strict;
+
+my $end = shift;
+my $start = shift;
+my $percent = ($end-$start)/$end;
+print $percent, "%\n"; 
+1;