Files
itgmania212121/Xcode/scripts/increment_version.pl
T

21 lines
506 B
Raku
Raw Normal View History

#!/usr/bin/perl -w
use File::Copy;
$ver = 0;
if( open FH, '<ver.cpp' )
{
<FH> =~ /version_num = (\d+);/ and $ver = $1 + 1;
close FH;
}
chop( $date = `date` );
chop( $time = `time` );
open FH, '>.ver.tmp' or die $!;
print FH <<"EOF";
extern const unsigned long version_num = $ver;
extern const char *const version_date = "$date";
extern const char *const version_time = "$time";
2015-03-22 10:03:50 -04:00
extern char const * const product_version = "5.0-git-UNKNOWN";
EOF
close FH;
move '.ver.tmp', 'ver.cpp';