From: Steinar H. Gunderson <sesse@rietz>
Date: Wed, 7 Mar 2007 12:00:32 +0000 (+0000)
Subject: Added a small script to query versions.idx for its version information
X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=commitdiff_plain;h=32330ab0926e5cdad0fca8b4a44c3e7d3010f649

Added a small script to query versions.idx for its version information
about a specific package.
---

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);
+