blob: 67e1f8a51e610f87839178e2df393483e4146066 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
#!perl
use File::Basename;
$basedir = dirname($0)."/../..";
-d $basedir or die "Base directory $basedir does not exist!";
chdir $basedir or die "Failed to change to base directory: $basedir: $!";
require "$basedir/infrastructure/BoxPlatform.pm.in";
print "#define BOX_VERSION \"$BoxPlatform::product_version\"\n";
exit 0;
|