diff -r 3ee9d9b5724c -r 06e0bf90ffec lib/version.PL --- a/lib/version.PL Mon Jan 04 11:18:27 2016 +0100 +++ b/lib/version.PL Mon Jan 04 11:27:08 2016 +0100 @@ -1,14 +1,16 @@ #! /usr/bin/perl my $outfile = shift; +my $now = localtime; chomp(my $version = `hg log -r . --template '{latesttag}-{latesttagdistance}-{node|short}\n'`); -my $now = localtime; -open(my $output, '>', $_ = $outfile) or die "Can't open $_: $!\n"; +if (defined $outfile) { + open(STDOUT, '>', $_ = $outfile) or die "Can't open $_: $!\n"; +} -print {$output} <<_; +print <<_; [%# autogenerated at $now by $0 %] [% vcs.version = "$version"; %] _ -utime 0, 0 => $outfile; +utime 0, 0 => $outfile