Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

executable file 23 lines (16 sloc) 0.388 kB
#!/usr/bin/perl
use strict;
use warnings;
my $build = 1;
my $file;
if(open($file, "build-number.h"))
{
($build) = <$file> =~ /^\#define BUILD_NUMBER (\d+)$/;
print "$build -> ";
$build++;
print "$build\n";
}
close $file;
open($file, ">", "build-number.h") or die "Couldn't open build-number.h for writing.";
print $file "#define BUILD_NUMBER $build\n";
close $file;
Jump to Line
Something went wrong with that request. Please try again.