I've got this running under Debian on an old Pentium holding over 7000 MP3s and it creates the array suprisingly fast.use File::Find; my @songs; sub eachFile { if (-e $_ && $_ =~ /\.mp3$/) { push @songs, $File::Find::name;} } find (\&eachFile, "/storage/mp3/");
In reply to Re: MP3 server with IO::Socket
by ryan
in thread MP3 server with IO::Socket
by perlmonkey
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |