Do not call perl from a bash script. Whatever required this before as since been fixed.
This commit is contained in:
+17
@@ -0,0 +1,17 @@
|
|||||||
|
#!/usr/bin/perl -w
|
||||||
|
|
||||||
|
$ver = 0;
|
||||||
|
if( open FH, '<ver.cpp' )
|
||||||
|
{
|
||||||
|
$_ = <FH>;
|
||||||
|
/version_num = (\d+);/ and $ver = $1+1;
|
||||||
|
close FH;
|
||||||
|
}
|
||||||
|
chop( $date = `date` );
|
||||||
|
open FH, '>ver.cpp' or die $!;
|
||||||
|
# Cannot use const here since gcc will strip it out...
|
||||||
|
print FH <<"EOF";
|
||||||
|
unsigned long version_num = $ver;
|
||||||
|
const char *version_time = "$date";
|
||||||
|
EOF
|
||||||
|
close FH;
|
||||||
@@ -1,19 +0,0 @@
|
|||||||
#!/bin/sh
|
|
||||||
|
|
||||||
perl -w -e '
|
|
||||||
open F, "<version.tst"||die;
|
|
||||||
$ver = <F>;
|
|
||||||
close F;
|
|
||||||
chomp $ver;
|
|
||||||
++$ver;
|
|
||||||
open F,">version.tst"||die;
|
|
||||||
print F "$ver\n";
|
|
||||||
close F;
|
|
||||||
$date = `date`;
|
|
||||||
chomp $date;
|
|
||||||
open F, ">ver.cpp"||die;
|
|
||||||
print F "unsigned long version_num = $ver;\n";
|
|
||||||
print F "const char *version_time = \"$date\";\n";
|
|
||||||
close F;
|
|
||||||
'
|
|
||||||
touch ver.cpp
|
|
||||||
Reference in New Issue
Block a user