From 32330ab0926e5cdad0fca8b4a44c3e7d3010f649 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sesse@rietz>
Date: Wed, 7 Mar 2007 12:00:32 +0000
Subject: [PATCH] Added a small script to query versions.idx for its version
 information about a specific package.

---
 get-version | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100644 get-version

diff --git a/get-version b/get-version
new file mode 100644
index 0000000..1867cdd
--- /dev/null
+++ b/get-version
@@ -0,0 +1,7 @@
+use Data::Dumper;
+use MLDBM qw(DB_File Storable);
+my %v;
+tie %v, "MLDBM", "/org/bugs.debian.org/versions/indices/versions.idx", 0;
+my $z = $v{$ARGV[0]};
+print Data::Dumper::Dumper($z);
+
-- 
2.39.2