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.49.0