summaryrefslogtreecommitdiffstats
path: root/debian/helpers/getver.pl
diff options
context:
space:
mode:
authorDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-28 13:20:27 +0000
committerDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-28 13:20:27 +0000
commit781b5caac364cb34393174b491ef3a8c56192976 (patch)
treea2b1d43df8cd9333bb5e5d086a8892e4264a59c3 /debian/helpers/getver.pl
parentAdding upstream version 2:1.19~1. (diff)
downloadgolang-defaults-781b5caac364cb34393174b491ef3a8c56192976.tar.xz
golang-defaults-781b5caac364cb34393174b491ef3a8c56192976.zip
Adding debian version 2:1.19~1.debian/2%1.19_1debian
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 'debian/helpers/getver.pl')
-rwxr-xr-xdebian/helpers/getver.pl14
1 files changed, 14 insertions, 0 deletions
diff --git a/debian/helpers/getver.pl b/debian/helpers/getver.pl
new file mode 100755
index 0000000..27a87b4
--- /dev/null
+++ b/debian/helpers/getver.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl
+
+# Extract upstream version from version in changelog.
+
+use warnings;
+use strict;
+
+use Dpkg::Changelog::Parse;
+
+my $fields = changelog_parse();
+my $v = $fields->{Version}->version();
+$v =~ /^([0-9]+\.[0-9]+).*/ or die 'INVALID VERSION! (needs X.Y)';
+
+printf("%s\n", $1);