Changeset 4558 in orxonox.OLD for orxonox/trunk/scripts
- Timestamp:
- Jun 8, 2005, 9:02:12 PM (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
orxonox/trunk/scripts/data.genlist.pl
r4103 r4558 1 1 #!/usr/bin/perl 2 ########################################################################## 3 # orxonox - the future of 3D-vertical-scrollers 4 # 5 # Copyright (C) 2004 orx 6 # 2 ########################################################################## 3 # orxonox - the future of 3D-vertical-scrollers # 4 # # 5 # Copyright (C) 2004 orx # 6 # # 7 7 # This program is free software; you can redistribute it and/or modify # 8 8 # it under the terms of the GNU General Public License as published by # 9 9 # the Free Software Foundation; either version 2, or (at your option) # 10 # any later version. 11 # 12 # ### File Specific: 13 # main-programmer: Benjamin Grauer 14 # co-programmer: ... 15 # 10 # any later version. # 11 # # 12 # ### File Specific: # 13 # main-programmer: Benjamin Grauer # 14 # co-programmer: ... # 15 # # 16 16 # This is a simple perl script, that generates a List of all files # 17 17 # contained in a Folder checked out with SVN and writes into an output # … … 52 52 { 53 53 if ($inputFile eq "." || $inputFile eq "..") 54 54 { 55 55 56 56 } 57 57 chomp($inputFile); 58 58 $fullName = "$folderName/$inputFile"; … … 62 62 print FD "$printFile\n"; 63 63 if (-d $fullName ) 64 65 66 64 { 65 &createFileList($fullName); 66 } 67 67 } 68 68 }
Note: See TracChangeset
for help on using the changeset viewer.