blob: d7ca0333129c6270c2923bbb79c292404c634aa4 (
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 "$BoxPlatform::product_version\n";
exit 0;
|