1 files changed, 22 insertions, 0 deletions
diff --git a/symbian/version.pl b/symbian/version.pl
new file mode 100644
index 0000000000..c8bb82ebf7
--- /dev/null
+++ b/symbian/version.pl
@@ -0,0 +1,22 @@
+use strict;
+
+my %VERSION;
+
+if (open(PATCHLEVEL_H, "patchlevel.h")) {
+  while (<PATCHLEVEL_H>) {
+     if (/#define\s+PERL_(REVISION|VERSION|SUBVERSION)\s+(\d+)/) {
+         $VERSION{$1} = $2;
+     }
+  }
+  close PATCHLEVEL_H;
+} else {
+  die "$0: patchlevel.h: $!\n";
+}
+
+die "$0: Perl release looks funny.\n"
+  unless (defined $VERSION{REVISION} && $VERSION{REVISION} == 5 &&
+          defined $VERSION{VERSION}  && $VERSION{VERSION}  >= 8 &&
+          defined $VERSION{SUBVERSION});
+
+
+\%VERSION;