plan9/versnum

   1 /PERL_VERSION/ {base = $3}
   2 /PERL_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 }