Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: installing modules

by RMGir (Prior)
on Apr 14, 2002 at 01:20 UTC ( #158876=note: print w/ replies, xml ) Need Help??


in reply to installing modules

Another problem that the others did not mention is that readdir will return file NAMES, not full paths.

If you do:

my $dir='h:\test'; opendir(DIR, $dir) || die "Unable to open directory: $!"; my @file_names = grep {-f $_} map "$dir\\$_",readdir(DIR); closedir(DIR);
you'll wind up with a list in @file_names of the full paths of the files, and ONLY the files, in that directory.

You could also add a grep on /mp3/i in that list to make sure you only get the mp3 files, since those are what you're looking for...
--
Mike


Comment on Re: installing modules
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://158876]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (6)
As of 2015-07-28 10:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (254 votes), past polls