rlm@9: @www = qw(AnnoyingKnock1.wav
rlm@9: AnnoyingKnock2.wav
rlm@9: AppleOfEnlightenment.wav
rlm@9: Arcade.wav
rlm@9: Battle01.wav
rlm@9: Battle02.wav
rlm@9: Battle03.wav
rlm@9: Battle04.wav
rlm@9: Battle05.wav
rlm@9: Battle06.wav
rlm@9: Battle07.wav
rlm@9: Battle08.wav
rlm@9: Battle09.wav
rlm@9: Battle10.wav
rlm@9: Bicycle.wav
rlm@9: BossIntro.wav
rlm@9: BrickRoad.wav
rlm@9: Bus.wav
rlm@9: Cave1.wav
rlm@9: Cave2.wav
rlm@9: Cave3.wav
rlm@9: CaveOfThePast.wav
rlm@9: ChaosTheater.wav
rlm@9: CoffeeBreak.wav
rlm@9: Dalaam.wav
rlm@9: DalaamIntro.wav
rlm@9: DeepDarkness.wav
rlm@9: Defeated.wav
rlm@9: Delivery.wav
rlm@9: DrAndonuts.wav
rlm@9: DrugStore.wav
rlm@9: DungeonMan.wav
rlm@9: DustyDunesDesert.wav
rlm@9: EightMelodies.wav
rlm@9: Ending1.wav
rlm@9: Ending2.wav
rlm@9: Ending3.wav
rlm@9: FileSelect.wav
rlm@9: FireSpring.wav
rlm@9: FlyingMan.wav
rlm@9: Fourside.wav
rlm@9: Giygas1.wav
rlm@9: Giygas2.wav
rlm@9: Giygas3.wav
rlm@9: Giygas4.wav
rlm@9: Giygas5.wav
rlm@9: GiygasDeath.wav
rlm@9: GiygasIntro.wav
rlm@9: GiygasPath.wav
rlm@9: GiygasStatic.wav
rlm@9: GrapefruitFalls.wav
rlm@9: HappyHappy.wav
rlm@9: HiddenTrack.wav
rlm@9: Home.wav
rlm@9: Hospital.wav
rlm@9: Hotel1.wav
rlm@9: Hotel2.wav
rlm@9: Hotel3.wav
rlm@9: Hotel4.wav
rlm@9: HotelScaraba.wav
rlm@9: House1.wav
rlm@9: House2.wav
rlm@9: House3.wav
rlm@9: Intro1.wav
rlm@9: Intro2.wav
rlm@9: IntroDemo.wav
rlm@9: IntroTitle.wav
rlm@9: JackiesCafe.wav
rlm@9: LevelUp.wav
rlm@9: LostUnderworld.wav
rlm@9: Magicant1.wav
rlm@9: Magicant2.wav
rlm@9: MagicantDepart.wav
rlm@9: MagicantEnter.wav
rlm@9: MagicCake.wav
rlm@9: MasterBelchBase.wav
rlm@9: MonkeyCave.wav
rlm@9: Moonside.wav
rlm@9: Mu.wav
rlm@9: NewGame.wav
rlm@9: Night.wav
rlm@9: Onett1.wav
rlm@9: Onett2.wav
rlm@9: OnettBuzz1.wav
rlm@9: OnettBuzz2.wav
rlm@9: OnettBuzz3.wav
rlm@9: OnettNight1.wav
rlm@9: OnettNight2.wav
rlm@9: OnettNight3.wav
rlm@9: Paula.wav
rlm@9: PeacefulRest.wav
rlm@9: Photographer.wav
rlm@9: PinkCloud.wav
rlm@9: Pokey.wav
rlm@9: PokeyIntro.wav
rlm@9: PokeysHouse.wav
rlm@9: PokeysHouseBuzz.wav
rlm@9: PowerUp.wav
rlm@9: Pray.wav
rlm@9: Pyramid.wav
rlm@9: Return1.wav
rlm@9: Return2.wav
rlm@9: RideSub.wav
rlm@9: RideUFO.wav
rlm@9: Robots.wav
rlm@9: Runaway5Bus1.wav
rlm@9: Runaway5Bus2.wav
rlm@9: Runaway5Bus3.wav
rlm@9: Runaway5Song1.wav
rlm@9: Runaway5Song2.wav
rlm@9: Sailing1.wav
rlm@9: Sailing2.wav
rlm@9: SaturnValley.wav
rlm@9: SaturnValley2.wav
rlm@9: Scaraba.wav
rlm@9: ScarabaDesert.wav
rlm@9: SeaOfEden.wav
rlm@9: SnowWood.wav
rlm@9: SnowWood2.wav
rlm@9: SoundStone.wav
rlm@9: SoundStone2.wav
rlm@9: Summers.wav
rlm@9: TendaVillage.wav
rlm@9: Tent.wav
rlm@9: Tessie1.wav
rlm@9: Tessie2.wav
rlm@9: Threed.wav
rlm@9: Topolla.wav
rlm@9: Twoson.wav
rlm@9: Venus.wav
rlm@9: Win1.wav
rlm@9: Win2.wav
rlm@9: Winters.wav
rlm@9: YourSanctuary1.wav
rlm@9: YourSanctuary2.wav
rlm@9: Zombies.wav);
rlm@9: 
rlm@9: 
rlm@9: 
rlm@9: $dir='./';
rlm@9: opendir DIR, $dir;
rlm@9: @files=grep !/^\./, readdir(DIR);
rlm@9: $" = "\n";
rlm@9: #print "@files";
rlm@9: $name = "AA";
rlm@9: $par = 0;
rlm@9: for (@files){
rlm@9: 	
rlm@9: 	if ($_=~m/\.wav$/i) {
rlm@9:         #print "$_\n";
rlm@9: 		rename "C:/spc700/$_", "C:/spc700/$www[$par]";
rlm@9: 		$name++;
rlm@9: 		$par++;
rlm@9: 		
rlm@9: 		
rlm@9:         
rlm@9: 	
rlm@9: 		}
rlm@9: 		
rlm@9: 		
rlm@9: 		
rlm@9: }