Quake-III-Arena

Quake III Arena GPL Source Release
Log | Files | Refs

extract_ver.pl (257B)

      1 #!/usr/bin/env perl
      2 # extracting version string from game/q_shared.h
      3 # hacked from Wolf build process
      4 
      5 # extract the wolf version from q_shared.h
      6 $line = `cat ../game/q_shared.h | grep Q3_VERSION`;
      7 chomp $line;
      8 $line =~ s/.*Q3\ (.*)\"/$1/;
      9 print "$line\n";