[perl5.git] / plan9 / versnum

/PATCHLEVEL/ {base = $3}
/SUBVERSION/ {subvers = $3}
END {
if (subvers == 0) 
	printf "p9pvers = 5.%03d\n", base> "buildinfo";
else
	printf "p9pvers = 5.%03d_%02d\n" , base, subvers> "buildinfo";
}
Commit	Line	Data
760ac839 LW	1	/PATCHLEVEL/ {base = $3}
	2	/SUBVERSION/ {subvers = $3}
	3	END {
	4	if (subvers == 0)
	5	printf "p9pvers = 5.%03d\n", base> "buildinfo";
	6	else
	7	printf "p9pvers = 5.%03d_%02d\n" , base, subvers> "buildinfo";
	8	}