- Timestamp:
- 07/29/08 17:07:49 (5 months ago)
- Files:
-
- Trunk/Scripts/Audio_scripts/Repository.pm (modified) (1 diff)
- Trunk/Scripts/Audio_scripts/UserSubmission.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
Trunk/Scripts/Audio_scripts/Repository.pm
r2629 r2632 50 50 print "\nRepository completed!****************************************************\n\n"; 51 51 return $self 52 53 52 } 54 53 #################################################################### Trunk/Scripts/Audio_scripts/UserSubmission.pm
r2628 r2632 212 212 $newDirectoryName =~ s/^DE-//; # German 213 213 $newDirectoryName =~ s/^RU-//; # Russian 214 $newDirectoryName =~ s/^IT-//; # Italian 215 $newDirectoryName =~ s/^SP-//; # Spanish 216 $newDirectoryName =~ s/^PT-BR-//; # Brazillian-Portuguese 214 217 # !!!!!! 215 218 $newDirectoryName =~ s/\[.*\]//;