--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lib/version.PL	Wed Dec 30 23:42:56 2015 +0100
@@ -0,0 +1,6 @@
+#! /usr/bin/perl
+my $output = shift;
+chomp(my $version = `hg log -r . --template '{latesttag}-{latesttagdistance}-{node|short}\n'`);
+
+open(STDOUT, '>', $output) or die "Can't open $output: $!\n";
+print qq{[% vcs.version = "$version"; %]\n};