From 729b64e5d1865b39bb216f619a7304f4e48e81e1 Mon Sep 17 00:00:00 2001
From: Ian Silvester <iansilvester@fastmail.fm>
Date: Fri, 16 Mar 2012 01:05:20 +0000
Subject: [PATCH] Add Perl script required for ascertaining version of privoxy
 code checked out

---
 findversion.pl | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 findversion.pl

diff --git a/findversion.pl b/findversion.pl
new file mode 100644
index 0000000..82f8862
--- /dev/null
+++ b/findversion.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl
+
+while(<>)
+  {
+  # Look for the first pattern that looks like a version. This must be
+  # the most recent version.
+  if(/Version\s(\d+\.\d+(?:\.\d+))/)
+    {
+    print $1;
+    exit(0);
+    }
+  }
+
+exit(1);
-- 
2.39.2