[p5sagit/Distar.git] / helpers / add-git-commit

#!/usr/bin/env perl
use strict;
use warnings FATAL => 'all';

use CPAN::Meta;
use Parse::CPAN::Meta;

my $file = shift || die "need a file";
my $meta = Parse::CPAN::Meta->load_file($file);

my $commit = `git rev-parse HEAD`;
chomp $commit;
$meta->{x_vcs_commit} = $commit;

my $tag = `git describe`;
chomp $tag;
$meta->{x_vcs_tag} = $tag;

CPAN::Meta->new($meta)->save($file, { version => ($file =~ /\.yml$/ ? 1 : 2) });
Commit	Line	Data
f45d9bde	1	#!/usr/bin/env perl
	2	use strict;
	3	use warnings FATAL => 'all';
	4
	5	use CPAN::Meta;
	6	use Parse::CPAN::Meta;
	7
	8	my $file = shift \|\| die "need a file";
	9	my $meta = Parse::CPAN::Meta->load_file($file);
	10
	11	my $commit = `git rev-parse HEAD`;
	12	chomp $commit;
	13	$meta->{x_vcs_commit} = $commit;
	14
	15	my $tag = `git describe`;
	16	chomp $tag;
	17	$meta->{x_vcs_tag} = $tag;
	18
	19	CPAN::Meta->new($meta)->save($file, { version => ($file =~ /\.yml$/ ? 1 : 2) });