glob different files + regular expression

[JackTheRussel]

Hi.

I have tried to glob all files which extensions are .wav, .mid, .mp3

I don't know how to "use" regular expression, could some on help me?

Now I can glob only files which extension are .mp3

#Go to folder where music-files locate.
my $music_path = "/home/some/music";
chdir ($music_path) || die "Cannot chdir to $music_path ($!)";
	
#glob all filenames which extension are .mp3
my @a = glob("*.mp3");

for (my $i=0; $i<@a; $i++){
do something...
}

 

[brigmar]

This should sort your particular issue:

my @soundfiles = glob("*.{mp3,wav,mid}");

 

[brigmar]

glob() itself doesn't work with regex's; it has its own expression syntax.
You can grep() the array that glob returns though for pattern matching.

my @soundfiles = grep {/\.(wav|mid|mp3|rm|ogg)$/i} glob("*");

 

[JackTheRussel]

Thank you very much for your advices !