config/build_header.pl

   1 open INFILE, "<$ARGV[1]";
   2 $build = <INFILE>;
   3 close INFILE;
   4 chop $build;
   5 open OUTFILE, ">$ARGV[0]" || die;
   6
   7 print OUTFILE "/* THIS IS A GENERATED FILE!\n*\n";
   8 print OUTFILE "* See mozilla/config/build_header.pl */\n*\n*/";
   9 print OUTFILE "\n\#define NS_BUILD_ID " . $build . "\n";
  10
  11 close OUTFILE;
  12