source:
box/trunk/infrastructure/printversion.pl
@
2329
| Revision 2329, 231 bytes checked in by chris, 3 years ago (diff) |
|---|
| Line | |
|---|---|
| 1 | #!perl |
| 2 | |
| 3 | $basedir = $0; |
| 4 | $basedir =~ s|/.*||; |
| 5 | $basedir .= "/.."; |
| 6 | -d $basedir or die "$basedir: $!"; |
| 7 | chdir $basedir or die "$basedir: $!"; |
| 8 | require "infrastructure/BoxPlatform.pm.in"; |
| 9 | |
| 10 | print "$BoxPlatform::product_version\n"; |
| 11 | |
| 12 | exit 0; |
Note: See TracBrowser
for help on using the repository browser.
